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Nog voor een keer !? , Ja, alweer .! 


Het bedrag van fl. 25,- over te maken naar : 
gironum 5244293 t.n.v. Fed. v.Atomclubs Ned.en Belgie 
Berkenlaan 24 
3737 RN Groenekan. 
Ofwel , als U een bankrekening wilt gebruiken, naar: 
nummer P 5244293 t.n.v. Fed. v.Atomclubs , etc zie 
hierboven 


KRAAK Er bleken enkele leden te zijn die “snel lezen”,; 
in het redactionele commentaar van Roland in het vorige 
vertelde hij * Ik zie het in gedachte al, de begeleidende 
brief , enz, enz ‚“ 


Enkele leden meenden dat de gedachte van Roland al 

werkelijkheid geworden was. Gelukkig is dat niet zo en 

vragen wij U wederom om zelf het geld over te maken. 

Voor de goede orde : onze voorraad acceptgiro's is al 

enkele jaren uitgeput en de kosten voor aanmaak zijn véél 
KAAKE te hoog voor het kleine aantal leden. 





Het Bestuur van de Federatie 
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VAN DE REDACTIE 


Tot ons aller verbazing, alweer een jaar om, en nog wel met een 
welgevuld Atom-Nieuws !. 

Hulde aan allen die daaraan hebben bijgedragen , namen noemen is 
in dit verband onnodig, men bladere in de inhoudsopgave van de 4 
nummers. 


Het lijkt er bijna op , dat de hartekreet van Roland de vorige 
keer zowaar effect heeft gehad, ben benieuwd of de variatie aan 
onderwerpen en schijvers zo groot blijft als in dit nummer het 
geval is. 


In ieder geval is het duidelijk dat de ATOM-in-PC een gouden 
greep geweest is, als geconstateerd kan worden dat 90 % van de 
leden een dergelijk apparaat heeft aangeschaft. 

Van de tweede serie zijn op dit moment nog maar een paar 
exemplaren over, zo weinig, dat het niet de moeite waard is , 
hem op te nemen in de lijst van atom-artikelen. 


Namens de redactie nogmaals : aan allen dank voor de bijdragen, 
plezierige feestdagen , een goed en gezond nieuw jaar en op naar 
een volgend , naar we hopen , interessant ATOM-JAAR 1995, 

Bruno Tossaint. 


REGIO-MEDEDELINGEN. 





Bijeenkomsten op het bekende adres : 
Adolf van Cortenbachstraat 92, Eindhoven, tel. 040-123231. 
Aanvang 13.30.u 


2. REGIO LIMBURG-BELGIE 


Clubavonden in “Oos Kaar” ,Geldersestraat 43, tel 046-321378. 


op de le vrijdag van de maand. 
N.B. 20 januari , jaarvergadering ‚met “nonnevotten". 





3. REGIO DEN HAAG 


Alles op het nieuwe adres : Theo Waayer 
Hendrik v. Boeijenlaan 66, 2273 DC Voorburg,t. 070-3862504 


4. REGIO ARNHEM e.o. 
Geplande bijeenkomsten Acorn Atom Club Regio Arnhem: 
ten huize van Henri Derksen, Bolwerk 25, 6811 JE ARNHEM 
op de derde woensdag van de maand. 
Telefoon: 085-455485, UniCorn BBS: 0085-425506 XXXX/XXXX BPS 
BNI 
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Ontwikkelingen Atom-in-PC 
door roland leurs 


Dit keer geen nieuwe spectaculaire ontwikkelingen, behalve dat 
Atom Decados al draait met de originele Atom Dos Controller- 
kaart en een oude bekende tekstverwerker is weer beschikbaar. 


Atom I/O kaart 


De 1/O-kaart moet nog van een klein detail worden voorzien; 
het enable-signaal moet een open collector uitgang worden, 

zodat andere kaarten ook het signaal kunnen bedienen. Naar 
verwachting komt deze kaart in januari 1995 beschikbaar. 


Atom disk-drive 


De Atom FDC met drives is inmiddels ook aangesloten op de 
Atom-in-PC kaart. Maar er is een ontwerp- cq denkfout gemaakt 
bij het aansluiten van de videolatches. Voor de video-emulatie 
wordt gebruik gemaakt van de NMI. Op het moment van ontwerpen 
ging ‘ik er van uit dat de NMI toch nooit gebruikt zou worden. 
Want wie wil nu 100 kb diskettes gebruiken in een tijd dat 
halve gigabyte harddisks al betaalbaar zijn. En zo is de 
“bediening” van de VideoNMI geen open collector maar gewoon 
een push/pull uitgang. 

De 8271 controller krijgt het helaas door deze opbouw niet 
voor elkaar om de NMI ingang van de processor laag te trekken; 
met andere woorden er kan niet van/naar Atom disk 
gelezen/geschreven worden. En twee weken nadat ik de 1/0 kaart 
heb aangekondigd met de zin 'Nooit meer krassen en onderbreken 
en piggy-packen’ komt Henk Bastings met een Shottky diode en 
stanleymes om de NMI alsnog van een soort open collector te 
voorzien. De drive werkt, maar dat krassen is niet de meest 
ideale oplossing. 

We zijn nu bezig om te onderzoeken of het kan om één uitgang 
van een GAL als open collector of Tri-state uitgang te 
programmeren; en zo ja, hoe doe je dat? U wordt op de hoogte 
gehouden. 
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ED64 tekstverwerker 


Onze oude bekende tekstverwerker is inmiddels ook beschikbaar 
voor Atoms in PC. Deze versie is geheel compatiìbie met alle 
voorgaande Atom exemplaren. Maar om het ding toch wat nieuws 
mee te geven is de naam veranderd in: 


Atom Word Master v2.00 


Dit is van origine een aanpassing van EDIT80 voor de koppeling 
Atom-Electron. Aangezien een belangrijk gedeelte van de 
operating systeem software voor de Atom-in-PC daarvan afgeleid 
is, is de aanpassing van die tekstverwerker een fluitje van 
een cent. Bij deze dus beschikbaar. 


Het programma is zowel ín geassembleerde als source-vorm te 
vinden op Henri's BBS en natuurlijk op de regioschijf. 


Terminalprogramma versie 3.2 


De ontwikkelingen van het terminalprogramma V3.xx zijn 
inmiddels in volle gang. Er zijn een aantal grafische 
mogelijkheden toegevoegd zoals het tekenen van cirkels, 
rechthoeken, driehoeken en lijnen. Verdere uitbreidingen 
zullen worden de mogelijkheden om met sprites te werken in 
extended video modi en (patroon) kleurroutines voor gesloten 
vlakken (vergelijk met het PAINT-statement uit het GAGS-rom. 


Mocht u zelf nog leuke of nuttige ideeën hebben dan bel, 
schrijf of E-mail gerust. 


Rest mij nog om u namens Pascalle en mezelf prettige 
feestdagen te wensen. 


Met vriendelijke groeten, 
Roland Leurs telefoon: 046-3706590 


Prins Mauritslaan 43 fidonet: 2:285/226.9 
6191 EC Beek 
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Atomdata in de pers 


Is de Atom-revival zodanig, dat de pers er aandacht aan be- 
steed? Nee, nog niet. Dit gaat over het samenpersen of compri- 
meren van data. 


Inleiding 


Wie wel eens zijn licht opgestoken heeft in de MS-DOS wereld, 
kent misschien de compressie programma's PKZIP, ARC en ARJ. 
Dat zijn van die handige programma’s die gebruikt kunnen 
worden voor het verkleinen van data. 

In dit verhaal probeer ik u uit te leggen hoe het een en ander 
in elkaar zit. De programeerlustigen onder u, wordt een com- 
plete analyse aangereikt om een AtomZip te maken. Leuk om uw 
naam dan weer eens in het clubblad te zien. 


Soorten compressie 


Het comprimeren van gegevens geschiedt in software. Er is, in 
ieder geval voor de Atom, nog geen chipset aanwezig die dit 
doet. En zo als voor alles in dit leven geldt cok hier: alles 
heeft zijn prijs. Een snelle compressie heeft een mager resul- 
taat; een fantastische compressie kost een heleboel tijd. 

Er zijn twee soorten compressie: een lossy en een lossless. 
Wat in gewoon Nederlands betekent: eentje waar je wel informa- 
tie mee verliest en eentje waar je geen informatie mee ver- 
liest. 

In eerste instantie zal een ieder geneigd zijn te denken: wat 
heeft een lossy, eentje waar je dus wat informatie mee ver- 
liest, nou voor zin. Wel wanneer het gaat om het overslaan van 
niet relevante informatie dan zal het duidelijk zijn dat 
datgene wat je niet nodig hebt, ook niet als ballast meegeno- 
men hoeft te worden. Denk aan een foto. Als u een prachtige 
kleurenfoto scant en er een zwart-wit afbeelding van gaat 
maken, dan heeft het geen zin om kleureninformatie bij dat 
betreffende bestand op te slaan. Zo ook de lossy compressie. 
Bij een lossless compressie gaat niets verloren, de uitkomst 
na de-compressie is identiek aan de invoer aan het compressie 
algoritme. 


Datacompressie is niet zo'n wonder als het op het eerste ge- 
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zicht lijkt. Maar ook hier krijg je niets voor niets; de niet 
bestaande ‘wet van behoud van informatie’ wordt meestal niet 
overtreden. Denk aan schijfcompressie. Een (MS DOS) programma 
als DoubleSpace kan meer bytes op schijf kwijt, omdat DOS 
slordig met de ruimte omspringt en te veel ruimte reserveert 
voor een bestand. Of bekijk onze Nederlandse taal: bepaalde 
letters en combinaties van letters komen vaker voor dan ande- 
re; met een beetje bijdehand coderen heb je minder bytes nodig 
dan wanneer je voor elk letterteken domweg één byte reser- 
veert. 


Drie algoritmen 


Er bestaan een aantal zeer bruikbare algoritmen. Ieder met 
zijn specifieke voor- en nadelen. De drie meest populaire 
worden hier wat toegelicht 


RLE 


De eenvoudigste van het stel werkt op basis van Run Length 
Encoding. RLE is een loss-less methode; er gaat geen bit 
verloren. Stel je hebt een bestand wat een Clear 4 plaatje 
codeert. Ieder bit representeert een schermpuntje. Het bestand 
begint met een aantal regels waar geen puntjes staan, dus de 
eerste bytes bevatten allen 00. Stel dat dat 40 bytes zijn, 
dus 320 punten, dan kan je in plaats van 40 maal een 00 ook 
een codering (40) 00 aangeven. Deze opslag kost dan 2 bytes in 
plaats van 40. Het uitpak algoritme leest eerst het aantal 
(40) en daarna de waarde 00, die dus 40 keer moet worden 
geschreven. 

Hoe meer naast elkaar gelegen bytes de zelfde waarde hebben, 
des te beter het RLE-algoritme presteert. Dat betekent dat de 
methode geschikt is voor plaatjes met weinig variatie. Voor 
rommelige, chaotische beelden heb je er niet veel aan. 


LZW 


Zo'n zelfde bezwaar geldt ook, hetzij wat minder, voor het LZW 
algoritme, een creatie van de heren Lempel, Zif en Welch. LZW 
wordt veel gebruikt. In TIFF en GIF plaatjes is de data met 
LZW gecomprimeerd, en ook het bekende inpakprogramma PKZIP 
past het toe. 

Bij LZW worden tijdens het lezen van het invoerbestand een 
tabel opgebouwd met combinaties van invoerstrings die tot dan 
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toe zijn gelezen. Zodra een zelfde string (serie bytes dus) 
opnieuw optreedt, wordt alleen genoteerd op welke plek in de 
tabel die serie staat. Een verwijzing naar zo’n tabel is 
natuurlijk veel korter dan de serie bytes weer opnieuw note- 
ren. 

LZW is eveneens een loss-less algoritme en presteert beter 
naarmate het bestand meer regelmaat bezit. 


Huffman 


In 1951 was David Huffman student aan het Massachusetts Insti- 
tue of Technology. De examenopgaven die hij van zijn leraar 
informatiekunde kreeg klonk eenvoudig: zoek de beste manier om 
gegevens in binaire code op te slaan. Hoe simpel ook omschre- 
ven, inhoudelijk was het een lastig probleem. 

Zijn uitgangspunt was het feit dat het ene symbool vaker 
voorkomt dan het andere. Een foto van een zeegezicht bevat 
bijvoorbeeld meer blauwe tinten dan rode, en in een tekst 
struikel je vaker over de letter E dan de letter Q. De truc is 
dan om de E met minder bits te coderen dan de Q. 

In een gewoon ASCII bestand wordt elke letter door één byte 
gecodeerd; het woord QEEQEE kost dus zes bytes. Geef je de E 
echter een kortere code dan de Q, bijvoorbeeld E=0.5 en Q=1.5, 
dan heb je nog maar vijf bytes nodig om het zelfde woord op te 
slaan. In een lange tekst, waar in verhouding meer E's dan Q's 
voorkomen, wordt de besparing nog groter. 

Het idee was niet nieuw, maar Huffman ontdekte dat het handig 
was een boomstructuur van ‘knopen’ te bouwen, waaruit je 
altijd de aller gunstigste codering kon aflezen. Zijn ingeving 
was simpel: begin niet bovenaan te bouwen aan de boom maar 
onderaan. Echte bomen groeien ten slotte ook zo. 


Zullen we de boom vast opzetten? 


Laten we het bouwen van een Huffman Boom in een voorbeeld 
naspelen. De hier gekozen frequenties van letters komt niet 
overeen met de werkelijkheid. Wie echt zijn tanden in dit 
onderwerp wil zetten, wordt naar het boek ‘The Turning Omni- 
bus’ van A.K. Dewdney verwezen. Maar let op: dat is veteranen- 
kost. Voor het gemak worden de letters A,B,C,D,E,F en G ge- 
bruikt, die met de volgende frequenties in een tekst optreden: 
0.25, 0.21, 0.18, 0.14, 0.09, 0.07 en 0.06. Bij elkaar opge- 
teld geven ze precies 1 ofwel 100%. 

Om tekst volgens de Huffman-codering samen te persen, moet je 
dus eerste alle letters tellen zodat je de percentages kunt 
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vaststellen, ofwel de kans dat ze optreden. Als je dit ce lang 
duurt, je moet tenslotte toch het hele bestand door lezen en 
tabellen maken, kun je de zaak bespoedigen door een standaard 
letterfrequentie te gebruiken. Voor iedere taal is zo'n fre- 
quentie tabel bekend. 


Het algoritme om de Huffman-boom te bouwen, werkt als volgt 
(zie cok de afbeelding): rangschik de letters naar oplopende 
frequentie (fase START) en voeg een nieuwe knoop toe (Stap 1), 
die 'ouder’ wordt van de twee letters met de laagste frequen- 
tie. 


san De aftakking naar 
@) @) @ links krijgt een O0 als 
A B C D E F _ G&G code, die naar rechts 
een 1. De knopen wor- 
@) @) (2) Stap 1 den vervolgens opnieuw 
gerangschikt (stap 2), 

À B e o hs E waardoor de ouder van 
(or) (0) F en G op de een na 

laatste plaats komen. 

6 Herhaal dit proces tot 

stap 2 dat alle letters een 
eigen eindknoop heb- 

ben. Na deze stappen 

heb je de complete 
Huffman-boom, waar bij 

alle letters een eind- 

knoop zijn en de bo- 

ï venste knoop een Êre- 
quentie heeft van pre- 
cies 1.0. De weg door 
de boom van boven naar 
beneden geeft nu aan 
welke codering je voor 





Huffman-code “elke letter moet ge- 
TAO bruiken. A wordt dus 
B 11 gecodeerd als Ol, B 
c ooo als 11, tot aan G=- 
D 001 1001. De letters die 
E 101 het vaakst optreden, 


F 1000 hebben de kleinst mo- 
G 1001 gelijk codering gekre- 
gen. 
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Een blik in de recente toekomst: Fractale compressie 


Fractale compressie wordt al commercieel toegepast. Het pro- 
dukt Encarta van Microsoft, wat op CD-Rom beschikbaar is, 
gebruikt dit. Dit algoritme is een lossy algoritme maar heeft 
als belangrijk voordeel dat er geen lelijke blokken ontstaan, 
zoals dat bijvoorbeeld met de hier niet besproken JPEG en 
MPEG, maar dat het beeld in zijn geheel hooguit wat wazig 
wordt, alsof er met een grove penseel over is gestreken. Toch 
stoort dat juist minder. 


Conclusie 


Er zit nog veel muziek in compressie. Velen maken van dit 
soort zaken hun afstudeer opdracht. Met name met de komst van 
een traag medium als CD-Rom ín combinatie met hee} veel infor- 
matie, is het nodig dat er hoogstaande compressie algoritmen 
komen. Deze zijn soms al als chip set beschikbaar, maar feite- 
lijk staat dat allemaal nog in de kinderschoenen. Toch zal het 
binnen 10 jaar mogelijk zijn om een 1,5 uur durende speelfilm 
op volle grootte en voorzien HiFi geluid op een ‘normale’ CD- 
Rom te krijgen. 
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255 


INTIKKEN EN RUNNEN MAAR: 


PROGRAM KLOKrtc 
REM BERRY LAM 850428 
REM LEM DULSTRAAT 57 
REM 2801 EP GOUDA 
REM 01820-84619 
DIM G4,T8,KK3 
BASE #78 
DEF STIP,0011110000000000 
DEF: 0111111000000000 
DEF: 1111111100000000 
DEF: 1111111100000000 
DEF: 1111111100000000 
DEF: 1111111100000000 
DEF: 0111111000000000 
DEF: 0011110000000000 
ASSIGN STIP,O 
REM invoer begin-tijd 
TIME $G;G?2=G?3;G?3=G?4;G?4=13 
IF LEN G<>4;GOTO 60 
D=G?3-48 
IF D<0 OR D>9;GOTO 60 
C=G?2-48 
IF C«0 OR C>5;GOTO 60 
B=G?1-48 
A=2?G-48 
IF A<0 OR A>2;GOTO 60 
IF B<0O OR B>9;GOTO 60 
IF B>3;IF A=2;GOTO 60 
REM teken begin-tijd 
CLEAR 4 
I=A;S=0;GOSUB 800 
I=B;8=50;GOSUB 800 

H 50;GOSUB 800 
I=D;S=200;GOSUB 800 
SET 0,114,30;SET 0,124,30 
SET O,114,50;SET 0,124,50 
REM start tijd-lus 
TIME $T; E=T?4; F=E 
DO 
DO TIME ST;E=T?4;UNTIL E<>F;F=E;REM wacht tot 1 minuut 






verstreken 


260 
269 


I=A;J=B;K=C;Le=D 
REM verhoog tijd 1 minuut en wijzig evt. ook andere 


cijfers 


270 
280 
290 
300 
310 


D=D+1 


KLOK: 
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320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
799 
800 
810 
820 
830 
840 
850 
860 
899 
200 
910 
920 
930 
940 
250 
960 
X=Z+V; 

970 
X=Z+V 
980, 
990 
995 
999 
1000 
1001 
1010 
1020 
1021 
1030 
1031 
1040 
1041 
1050 
1051 
1060 
1061 
1070 
1071 
1080 
1081 
1090 
1091 
18999 


ELSE REM 
XIF B=10;B=0;A=A+1 
N=1;5=0;GOSUB 900 
ELSE REM 
N=J;5=50;GOSUB 900 
ELSE REM 
N=K;8=150;GOSUB 900 
EDSE REM 
N=L;8=200;GOSUB 900 
UNTIL 0 
REM teken-routine begin-cijfers 


RESTORE (1000+1*10) 

DO READ Y 

IF Y=0;GOTO 850 

READ X;X=X+8 

SET 0,X,Y 

UNTIL Y=0 

RETURN 

REM routine om de cijfers te laten verspringen 
RESTORE (2000+N*10) 

DO READ Y 

IF Y=0;GOTO 990 

READ X;READ Z;READ W 

X=X+8; Z=2+5 

V=SGN(Z-X) 

IF W=1;SET O,X,Y;SET O,X,Y;DO CARRY O,X,Y;X=X+V; UNTIL 
SET 0,2,Y 

IF W=2;SET O,X,Y;SET O,X,Y;DO CARRY 0,X,Y;X=X+V; UNTIL 


IF W=3;SET O, (X+V),Y;DO CARRY O,X,Y;X=X+V; UNTIL X=Z4+V 
UNTIL Y=0 

RETURN 

REM data voor het tekenen van de begin-cijfers 

DATA 10,14,10,24,20,4,20,34,30,4,30,34,40,4,40,34 
DATA 50,4,50,34,60,4,60,34,70,14,70,24,0,0 

DATA 10,24,20,24,30,24,40,24,50,24,60,24,70,24,0,0 
DATA 10,4,10,14,10,24,10,34,20,4,30,4,40,14,40,24 
DATA 50,34,60,4,60,34,70,14,70,24,0,0 

DATA 10,14,10,24,20,4,20,34,30,34,40,14,40,24 

DATA 50,34,60,4,60,34,70,14,70,24,0,0 

DATA 10,34,20,34,30,34,40,4,40,14,40,24,40,34 

DATA 50,4,50,34,60,4,60,34,70,4,70,34,0,0 

DATA 10,14,10,24,20,4,20,34,30,34,40,14,40,24 

DATA 50,4,60,4,70,4,70,14,70,24,70,34,0,0 

DATA 10,14,10,24,20,4,20,34,30,4,30,34,40,4,40,14,40,24 
DATA 50,4,60,4,60,34,70,14,70,24,0,0 

DATA 10,4,20,4,30,14,40,24 

DATA 50,34,60,34,70,4,70,14,70,24,70,34,0,0 

DATA 10,14,10,24,20,4,20,34,30,4,30,34,40,14,40,24 
DATA 50,4,50,34,60,4,60,34,70,14,70,24,0,0 

DATA 10,14,10,24,20,4,20,34,30,34,40,14,40,24,40,34 
DATA 50,4,50,34,60,4,60,34,70,14,70,24,0,0 

REM data voor het verspringen van de cijfers 
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2000 DATA 10,14,24,1,20,34,24,2,20,4,24,1,30,34,24,2 
2001 DATA 30,4,24,1,40,34,24,2,40,4,24,1,50,34,24,2 
2002 DATA 50,4,24,1,60,34,24,2,60,4,24,1,70,14,24,1 
2003 DATA 0,0,0,0 

2010 DATA 10,24,34,3,10,24,14,3,10,14,4,3,20,24,4,2 
2011 DATA 30,24,4,2,40,24,14,3,50,24,34,2,60,24,4,3 
2012 DATA 60,24,34,2,70,24,14,3,0,0,0,0 

2020 DATA 10,34,24,1,10,4,14,1,20,4,34,3,30,4,34,2 
2021 DATA 0,0,0,0 

2030 DATA 10,14,24,1,10,24,34,2,20,4,34,1,40,14,4,3 
2031 DATA 40,24,34,3,50,34,4,3,70,14,4,2,70,24,34,2 
2032 DATA 0,0,0,0 

2040 DATA 10,34,24,2,10,24,14,3,20,34,4,3,40,4,14,1 
2041 DATA 40,34,24,1,50,34,4,1,60,34,4,1,70,4,14,3 
2042 DATA 70,34,24,3,0,0,0,0 

2050 DATA 30,34,4,3,40,14,4,3,60,4,34,3,70,4,14,1 
2051 DATA 70,34,24,1,0,0,0,0 

2060 DATA 10,24,14,1,10,14,4,2,20,34,4,1,30,4,14,2 
2061 DATA 30,34,14,1,40,4,14,1,40,14,24,1,50,4,34,2 
2062 DATA 60,4,34,1,70,14,4,3,70,24,34,3,0,0,0,0 
2070 DATA 10,4,14,2,10,14,24,3,20,4,34,3,30,14,4,3 
2071 DATA 30,14,34,2,40,24,14,3,50,34,4,3,60,34,4,3 
2072 DATA 70,4,14,1,70,34,24,1,0,0,0,0 

2080 DATA 30,4,34,1,40,24,34,3,0,0,0,0 

2090 DATA 30,34,4,3,40,24,14,1,40,14,4,2,0,0,0,0 
2100 DATA 30,34,4,3,40,14,4,2,40,24,34,2,50,4,34,3 
2101 DATA 60,4,34,3,70,4,14,1,70,34,24,1,0,0,0,0 
2110 DATA 30,34,4,3,40,14,4,2,40,24,34,2,50,34,4,3 
2111 DATA 0,0,0,0 

2120 DATA 10,4,14,1,10,34,24,1,20,4,34,3,30,4,34,3 
2121 DATA 40,14,4,2,40,24,34,2,50,34,4,3,0,0,0,0 
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Een verhaal over het maken van een verhaal 
Inleiding 


Nee, nee, geen uitgebreid verhaal over het recursief program- 
meren zoals de titel wellicht zou vermoeden, maar een verhaal 
over hoe je een stuk informatie zodanig op papier krijgt, dat 
je medemens daar ook nog iets zinnigs van kan opsteken. 

Naar aanleiding van de (terechte) dramatische oproep van 
Roland in het vorige nummer, even een handreiking aan hen, die 
wel willen schrijven maar even niet weten waar te beginnen. 


De opzet 


Kent u dat gevoel, wat u krijgt als zo'n leeg vel of scherm u 
staat aan te staren. Waar moet je beginnen en waar moet je 
eindigen. Ik heb mij door een gerenommeerd aannemer eens laten 
vertellen dat hij dat gevoel ook heeft. Daar sta je dan in de 
polder, tot je enkels in de bagger. Niets maar dan ook niets 
duidt er op dat daar binnen 18 maanden een High-tech gebouw 
zal komen te staan. Hij werkt echter met gereedschappen zoals 
tekeningen en pianningen. Zonder dit gereedschap, is het 
project gedoemd te mislukken. Zo is het ook met het schrijven 
van een stukje: zonder een juiste aanpak is het nauwelijks tot 
een goed einde te brengen. 


Volgorde 


Volgorde is belangrijk. Zoals ook een aannemer niet de muren 
gaat metselen voordat er een fundering ligt, zo heeft ook een 
verhaal een bepaalde opbouw: een inleiding, de clou en een 
einde, niet noodzakelijkerwijs in die volgorde, maar dat is 
wel praktisch. Vertel in de inleiding waar het over gaat: is 
het hardware beschrijf dan middels een pakkend voorbeeld waar 
het over gaat. Mooi voorbeeld bij het aansturen van een dis- 
play is het schermpje met de 'ROM=PCHARM'’ ‘WriteProtect = ON! 
uit het verhaal van Guido in de vorige AN. 

Gaat het over software, vertel dan wat het doet en wat de 
reden is om er over te schrijven. Dat kan twee doelen hebben, 
namelijk het uitleggen van de gebruikte techniek of het bege- 
leiden van de gebruiker van het programma als een extra vorm 
van handleiding. 

Het verhaal wat u schrijft, heeft een doel. Zorg dat in de 
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inleiding al duidelijk wordt, wat de bedoeling is. Lukt dat 
daar niet, dan is het gedoemd te stranden op het niveau van 
bladvulling. 

Wie de lezer bij de inleiding boeit, heeft hem vast tot aan de 
laatste regel van het stuk, ook al zijn er passages die niet 
na één keer lezen duidelijk zijn. 


De clou 


Waar het echt op aankomt, wordt in de middenmoot van het stuk 
beschreven. Let er op dat dit onderverdeeld wordt in hanteer- 
bare brokken. Zelf gebruik ik zo maximaal 18 regels per item. 
Wordt dit langer, dan probeer ik het op te knippen in nog 
kleinere items. 

In de clou wordt iets over de details uitgelegd. Waarom moet 
pootje 14 aan de plus hangen of waarom is het handig om die 
instructies in die specifieke volgorde te gebruiken. 

Gebruik gewone Nederlandse taal. Het heeft geen zin om een 
verhaal in de stijl van Karel ende Elegast te schrijven. Zo 
praten we tenslotte ook niet met elkaar. 

Gebruikt u een programmalisting, gebruik dan gerust een stuk 
daarvan in de tekst om dit nader uit te leggen. Zorg daarbij 
wel voor voldoende leesbaarheid. Iedereen weet wel dat PRINT 
tot P. kan worden afgekort, maar PRINT is nou eenmaal toch wat 
duidelijker. En in een tijd waar geheugen tot in voldoende 
mate beschikbaar is, is dat niet echt een argument meer. 


De staart 


Het ei is gelegd. Eindelijk een inleiding met clou van één of 
meer pagina’s. En dan nog even de afronding. Die kan kort 
zijn. Prikkel de lezer tot nader experimenteren. Tracht de 
medemens uit de tent te lokken om er zelf ook iets aan te 
doen. Het is best leuk om te zien dat anderen dat oppakken. 
Het doet mij bijvoorbeeld veel plezier als ik mijn roemruchte 
assemblerversie zie van de CRC berekening van de ROMS, Zelfs 
in het afgelopen nummer kwam ik deze routine 11 (!}) jaar na 
dato weer eens in een uitstekend programma tegen. Zoiets is 
nou exact wat ik bedoel, Dat wat je schrijft heeft een doel en 
kan door anderen worden geïmplementeerd in een groter geheel. 
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Waarover kan je schijven 


Het schrijven van een verhaal is in basis niet echt moeilijk. 
Als het de moeite waard is om er een of meerdere avonden mee 
bezig te zijn, dan is het ook de moeite om er een verhaaltje 
over te schrijven. Niet alle verhalen hoeven over uitgesproken 
high tech dingen te gaan. Hoe bijvoorbeeld een spel als Inva- 
ders werkt, dat is best leuk. Of wat je met de Atom doet. Hoe 
heb je de software verdeeld over tapes of diskettes. 

Gebruik als ‘t effe kan, wat humor in het verhaal. Die nuìle- 
tjes en eentjes zijn al droog genoeg, dus waarom niet eens een 
gekke opmerking. 


De layout 


Het verhoogt de leesbaarheid als gebruik wordt gemaakt van 
kleine hoofdstukjes met een titel. Niet te lang en niet te 
ingewikkeld. 

Probeer de conditie van uw printer aan te passen aan de lees- 
baarheid. Beter een verhaal op disk opgestuurd naar de eindre- 
dacteur, dan een donkergrijze letter op een stuk kringlooppa- 
pier. 

Listings mogen wat mij betreft nooit meer dan 2 pagina's in 
beslag nemen. Daarna haakt de lezer toch af. Beter is het dan 
om de programma's via de bestaande distributie kanalen te 
verspreiden en de elementaire zaken in het stuk te noemen. 
Gebruikt u plaatjes of tekeningen, probeer dan duidelijk over 
te komen. 


Wees niet bang om fouten te maken 


Het gaat ook wel eens mis. Heeft u het verhaal gelezen in het 
vorige nummer, over het trekken van lijnen? Nou, daar zaten 
plaatjes bij, gemaakt in Corel Draw. Heeft 2 avonden gekost. 
Uitgeprint op een sjonge-wat-is-ie-duur postscriptprinter van 
het bedrijf. Het zag er qua lay-out goed uit. Maar het uitein- 
delijke resultaat in Atom Nieuws: ik kon zelf amper lezen wat 
er staat. Oorzaak: de lijntjes waren te dun, en de afbeelding 
op A4 terwijl het boekje A5 is. 

Is het verhaal eenmaal uit de printer gerold, laat het dan 
door iemand lezen die u verdenkt van enig taaltechnisch ìn- 
zicht. Het verwijderen van tik- en stijlfouten is voor de 
niet-schrijver van dat stukje veel eenvoudiger dan voor de 
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schrijver zelf. Echt, u behoort tot de uitzonderingen als u uw 
eigen fouten kunt vinden. 


Wees niet bang 


Het maken van fouten is niet erg, het maken van twee keer 
dezelfde fout wel. Daarom is het van belang dat u iets schrij- 
Ét. Zo kan de kennis binnen de club worden vergroot. Maar er 
is meer. Zo bouwt u ook aktief mee aan het ontwikkelen van uw 
eigen persoonlijkheid. Communicatie tussen geest en papier, of 
in gesproken woord, is een van de belangrijkste dingen in het 
maatschappelijk functioneren. Lijkt wel een zin uit een com- 
merciele folder voor een training. Dat kon ook wel eens zo 
wezen maar is, ondanks dat, toch meer dan waar. 

Het feit dat u bijvoorbeeld de hier geschetste indeling over- 
neemt is niet een kwestie van plagiaat of iets dergelijks. Ik 
heb zelf de 6502 niet bedacht, toch kan ik er leuke dingen mee 
doen. Dat is dus precies het zelfde. Gebruik het raamwerk 
Inleiding, Clou en conclusie om het verhaal op te zetten. 
Bedenk wat u met het verhaal wilt bereiken. Ga er voor zitten 
en u zult zien: de eerste keer een drama, de tweede keer is 
het al eenvoudiger en vanaf de derde keer is het leuk. Vraag 
dat maar eens aan de overige schrijvers in de Atom Nieuws. 

Hoe dat er in de praktijk uit kan zien, bekijk dat maar eens 
elders in het nummer, naar het stukje over 'de schoonheid van 
tabellen’. 


Conclusie 


Het is goed te doen om stukjes te schijven. Het zal altijd zo 
zijn dat er verschil is tussen de ene en de andere schrijver, 
maar voor mensen binnen deze club moet het toch allemaal 
mogelijk zijn om iets op papier te krijgen. En dat hoeft ook 
niet eens echt veel tijd te kosten. Als je van te voren weet, 
welke indeling je aanhoud, is het in een uur te realiseren. 
Dit verhaal bijvoorbeeld is in 3 kwartier bedacht en gereali- 
seerd. Reken daar 10 minuten bij voor het nakijken en corrige- 
ren van stijlfouten en typo's. Moet te doen zijn dus. 

Nog wat ideeën om over te schijven nodig: Wie legt uit hoe 
Space Invaders is opgezet. Op het scherm gebeuren een heleboel 
dingen te gelijkertijd. Hoe doe je dat? 

Wie vertelt iets over de Floating point rom? 

Van de Atom je werk gemaakt? Of mede dankzij de Atom de huidi- 
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ge baan veroverd. Vertel eens hoe dat gaat. 
Iets beleefd met je Atom waar je niet uitkomt? Schijf eens 
helder op papier wat je gedaan hebt en vraag het antwoord aan 
je mede Atomisten. 
Het blad bestaat bij de gratie van de schrijvers. Het zou toch 
zonde zijn als een blad als deze moet opdoeken door het gebrek 
aan kopij. De Atom is toch nog steeds zodanig interessant, dat 
het 25 jarig bestaan van de club moet gehaald kunnen worden. 
Wellicht tegen die tijd op een kaart met optische verbinding 
naar een machine met bio geheugen, draaiend op een kloksnel- 
heid in de buurt van het optische spectrum. Beeldscherm en 
toetsenbord zijn dan alleen nodig voor de Atom-in-?? kaart. De 
andere interface geschiedt middels een RS-464 connector in het 
achterhoofd. .... en vooral een multi-media uitgave van Atom- 
nieuws. Ieder kwartaal opnieuw de mooiste stukjes van het die 
de stap op het schrijverspad hebben gezet, naar aanleiding van 
een artikel in de jaren '90....... 

Leendert 
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De schoonheid van tabellen 


Het nut van een tabel 


Iedereen kent natuurlijk tabellen. Of het nu gaat om het 
berekenen van een sinus of om te bepalen hoeveel calorieën er 
in de vakantie per eenheid produkt zijn bijgekomen: tabellen 
zijn goed voor het betere opzoekwerk. 

Tabellen kunnen ook voor het versnellen van programma’s worden 
gebruikt. Op die manier wordt eenmalig rekenwerk opgeslagen in 
een tabel en middels het raadplegen van die tabel wordt snel- 
heid bereikt. 


Wat gaan we maken 


Tabellen heeft altijd de associatie met saai. Vandaar dat ik 
mijn best gedaan heb een sprankelend voorbeeld te bedenken. 
Wat we gaan doen is het volgende: Beeldschermmode 4 wordt 
gespiegeld rondom zijn verticale midden-as. Met andere woor- 
den: wat links staat, staat dan rechts en wat rechts staat, 
dat staat dan links, maar dan beide in spiegelbeeld. Enfin. 
Wie niet weet wat spiegelbeeld is, moet zich nog maar eens 
gaan scheren, met excuus aan de vrouwelijke lezer, 


De beeld opbouw 


Natuurlijk volkomen overbodig, maar omdat de Atom Nieuws 
anders toch niet volkomt, hier een kleine samenvatting van hoe 
Clear 4 werkt. 

Iedere regel bestaat uit 32 bytes, die ieder goed zijn voor 
acht individuele puntjes. Een bitwaarde 1 komt overeen met een 
oplichtend puntje, de bitwaarde 0, schop open die deur, met de 
afwezigheid van een oplichtend puntje. 

Afhankelijk van de mode, zijn er tot 192 beeldlijnen. Dus 192 
maal 32 bytes. 


Het Spiegelen 


Het spiegelen van een scherm, wil zeggen dat wat links komt te 
staan en andersom. Maar het niet eenvoudig het verwisselen van 
de twee bytes. Om dit te illustreren hier een bitpresentatie 
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van een paar puntjes. 0010.0000 wordt in spiegelbeeld 
0000.0100. Wat moet er verder gebeuren. Wel het wisselen van 
individuele punten is een tijdrovende aangelegenheid. Beter is 
het om het op byte niveau, dus in Clear 4 met acht punten 
tegelijk. Hoe ziet dat er in de praktijk uit. Wel eerst wordt 
de waarde van #801F, wat overeenkomt met de acht puntjes in de 
rechterbovenhoek van een Clear 4 scherm, opgehaald. Deze wordt 
gespiegeld en even opgeslagen. Vervolgens wordt #8000, de acht 
bytes uit de linkerbovenhoek opgehaald en na gespiegeld te 
zijn, geplaatst op locatie #801F. Het tijdelijk bewaarde 
resultaat van het voormalige #801F wordt weer opgehaald en ge- 
plaatst op locatie #8000. Vervolgens wordt verder gegaan met 
#801E en #8001. Dit gaat zo door tot #800F en #8010. Dat is 
dus de spiegellijn. 


Het spiegel algoritme 


Het verplaatsen van individuele bits gaat met een rotatie 
instructie. Om een spiegelbeeld van een willekeurig byte te 
krijgen kan met de volgende methode worden gewerkt. 
for n=1 to 8 
Carry is ror waarde 
Spiegel is rol waarde met Carry 
next 
Een beetje abacradaba op het eerste gezicht. Maar wat gebeurt 
er. Het byte wordt acht maal naar rechts geschoven, waarbij 
het resultaat in de Carry komt te staan. Dit resultaat wordt 
vervolgens naar links geschoven met de Carry. Op die manier 
ontstaat een spiegelbeeld van de invoerwaarde. Nog even een 
plaatje: 





ROR A {schuif naar rechts) 


EPE EEt 


ROL A (schuif naar links) 





le | 7 6 fs [4 [3 {2 [1 c 
7] 
Vv 
J 











Tot zover niets aan de hand. Het werkt naar behoren. Even wat 
tellertjes om het geheel van #8000 tot #97FF te laten geschie- 
den en klaar is Leen. Maar. Maar dat gaat allemaal niet zo 
snel, want per spiegel zijn er een aantal instructies nodig: 
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Idx @8 


again ror a 
rol #70 
dex 
bne again 


Per byte altijd nog goed voor 8 * (2+5+2+3) clock cycli. Dit 
moet voor steeds paartjes van twee bytes, u weet wel #8000 en 
#801F gebeuren dus per wissel gaan er 192 clock cycli in CPU- 
rook op. 

De oplettende lezer zal al vermoeden dat dit op een andere 
manier kan. 


Oplossen met een tabel 


Als gekeken wordt naar de mogelijkheden om een byte te spiege- 
len, dan zijn er waarden van O0 tot 255 met een bijbehorend 
spiegelbeeld. Wat is dan eenvoudiger om een tabel te maken, 
waar in op locatie X, waarbij X mag liggen tussen O en 255, de 
gespiegelde antipode staat opgeslagen. Dat scheelt veel over- 
bodig rekenwerk. 

Het maken van zo'n tabel is in assembler een koud kunstje. In 
Basic gaat dat al een stuk lastiger. Laat ons zien: 


10 REM SPIEGEL 
20 DIM K 255, LL20 
40 FOR N=l TO 20; LLN=-1; NEXT N 
50 FOR N=0 TO 2 STEP 2 
60 P=#7000; [ 
70 :LLO LDX @#00 
80 :LL1 LDY @#08 
90 STX #72 
100 :LL2 ROL #72 
110 ROR A 
120 DEY 
130 BNE LL2 
140 STA K‚X 


150 DEX 

160 BNE LEI 
170 RTS ; } 
180 NEXT 


190 END 
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Er wordt ruimte gevraagd, middels de DIM k 255 voor een tabel 
met die omvang. Vervolgens wordt in een lus van het X register 
de hele zaak van 00 tot 255 opgebouwd. Locatie #72 wordt als 
hulpvariabele gebruikt en het Y register voor de acht bit 
posities die de waarden kunnen innemen. 

Is zo'n tabel eenmaal een feit, dus als deze geïnitialiseerd 
is door het aanroepen van LLO, dan kan deze in het daadwerke- 
lijke spiegelprogramma worden gebruikt. 


De harde lus voor het spiegelen 


Voor het wisselen van de waarden op de lokaties #8000 en #801F 
komt onder normale omstandigheden heel wat testwerk kijken. 
Niet bevorderlijk voor de snelheid dus. Vandaar dan gekozen is 
voor een andere opzet. Hiervoor wordt in hoge mate de stack 
misbruikt. Maar wat maakt het uit. Deze is ervoor en er is 
toch al voor betaald. 

Wat er gebeurt is het volgende. De waarden van #801F tot en 
met #8000, worden in aflopende volgorde op de stack gezet. 
Vervolgens wordt in de laatst weggeschreven waarde, die van 
#8000 dus, via de reeds genoemde tabel even gespiegeld en weer 
op locatie #BO1F weggeschreven. Niets klungelen met allerlei 
ingewikkelde testjes, nee, gewoon gebruik maken van het First 
in Last out principe van de stack. Even een weetje dus. Laat 
ons de definitieve code bekijken, inclusief de tabel en de 
initialisatie routine. 


10 REM SPIEGEL in 200 milliseconde 
20 DIM K 255, LL20 
40 FOR N=l TO 20; LLN=-1; NEXT N 
50 FOR N=0 TO 2 STEP 2 
60 P=#7000;£ 
70 :LLO LDX @#00 
80 :LL1 LDY @#08 
30 STX #72 
100 :LL2 ROL #72 
110 ROR A 
120 DEY 
130 BNE LL2 
140 STA K‚X 
150 DEX 
160 BNE LL1 
170 RTS 
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180 :LL6 LDA @#80 


190 STA #71 

200 LDY @#00 

210 STY #70 

220 LDX @24 doe dit feest voor 6Kb dus 24 
blokken van ieder 255 bytes 

230 STX #72 


240 :LL3 LDY @#1F 
250 :LL4 LDA (#70),Y 


260 PHA zet 32 bytes op de stack 

270 DEY 

280 BNE LL4 

290 LDY @#1F Het byte rechts op het scherm 

300 :LLS PLA haal hem van de stack 

310 TAX gebruik x als offset 

320 LDA K‚X Houdt hem tegen de spiegel 

330 STA (#70),Y en prak hem weer in het video 
geheugen 

340 DEY 

350 BNE LLS 

360 LDA #70 

370 CLC 

380 ADCe#20 de volgende regel 

390 STA #70 

400 BCC LL3 Geen page overgang 

410 INC #71 

420 DEC #72 alle 24 blokken gehad? 

430 BNE LL3 

440 RTS;] 

450 NEXT 

460 LINK LLO ; REM initialiseer tabel 


470 CLEAR 4 

480 MOVE 10,10;DRAW 256,192; REM doe iets, kreng 
490 DO 

500 LINK LL6 REM doe iets in een lus 
510 U.0 


Conclusie 


Zo ziet u hoe het mogelijk is om door middel van een tabel, 
toch hele snelle dingen te bereiken. Uiteraard onder vermel- 
ding dat het op een Intel op 100 MHz toch nog wat vlotter 
gaat. Maar daar hadden we het niet over. 

Wie kan nog sneller spiegelen? Meldt het in de Atom, of leg 
het me uit, dan schijf ik er wel weer een stukje over! 
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Deel 3 


Ja. ja. ik weet het, deze kaart had míinheer Acorn 10 jaar 
geleden moeten maken, maar helaas. Ze hebben daar wel een poging toe 
gedaan maar dat is zoais jullie weten niet zo goed gelukt. De 
problemen bij die kaart zaten in het digìtalizeren van de analoge RY, 
B-Y en Y signalen, welke gemaakt worden door de videoproceasor MC6647. 
De pixelbreedte (tijd) was niet voor alle kleuren gelijk, en zeker 
niet als kleurenset 2 (met bit 3 van #B002) ingeschakeld werd. 
Bovendien was de kleurenuitcodering gedaan met meerdere poorten achter 
elkaar en ook nog per kleur een verschillend aantal in serie. Hierdoor 
ontstonden extra tijdverschillen tussen de kleurensignalen. waardoor 
er vieze gekleurde overgangen op het scherm te zien waren. Bovendien 
was er dan nog het bekende ruisprobleem. Kortom, de kaart werkte niet! 
Nog even ter herinnering het blokschema van het complete color/cotour 
systeem. Het blokschema van het geheel zag eruit als volgt: 





1 1 l=- 9-p CGA 
Ì 1 TTL adapter Ì 
Ì kaart l-——- 1 1 6-p DIN 
1 11 ennn 
menemen 1 ï 
1 1 

nnee 1 anmmenn 

1 == deel 1 21l-p SCART 

1 1 Color/colour- 1 

1 1 interface 1 

Imedeen I-- 2-p CVBS 





In de twee vorige delen (A.N. 10-2 en A.N. 12-3) zijn de 
80-kolomskaart, de color/coìour interface en de TIL adapter uitvoerig 
beschreven. In dit deel komt dan eindelijk de ATOM-kaart aan de beurt. 
De belangstelling zal waarschijnlijk wel nihil zijn. maar ik wil toch 
een poging wagen om uit te leggen hoe het een en ander werkt. 


De ATOM kleurenkaart. 


De opbouw van de kaart is als volgt: 
a) Video processor U13 type MC6847. 
b)} A/D omzetters U1OA t/m U12B type LM319. 
Cc) RGBI codering Ul type 825129. 


d) RGBI latch U2 type 74L5379. 

e) Sync scheider U1OB, U6E en U6F type LM319 resp. 74LS504. 

f) Pixelclock 3.58 resp. 7.16 MHz U7C en U7D type 74L586. 

g) Schakelsignaal decodering PCO, PC3, A/G en GMO met U4A, USA, 
U6A en U6D type 74L574. 74LS02 en 74L504. 

h) Omschakelaar 6502 clock 1.0 naar 1.79 MHz U14A, U14B en U7B 
type 74120 en 74L586. 

i} Autosyne (ruisonderdrukker) U4B, U8 en U9 type 74LS74, 74LS73 


en 74L502. 
j) Signaalbuffers en kaartomschakeling U3 type 74LS367 . 


In het bijgaande schema is bovenstaande opsomming goed te 
herkennen en hierna zal ík punt voor punt trachten de werking enigzins 
te verklaren. 
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a) Video processor MC6847. 


De video processor doet zijn normale werk zoals hij altijd al 
gedaan heeft in de ATOM. alleen voor deze achakeling verzorgt hij nog 
enige andere taken. Allereerst de drie video signalen Y, R-Y en B-Y en 
het referentie signaai CHB. Deze videosignalen zijn de signalen waar 
het in dit ontwerp om draait. In de ATOM worden deze signalen naar PL4 
gevoerd, maar verder niet gebruikt. Verder maakt de chip nog een paar 
nuttige schakelsignalen, zoals A/G (Alpha/Graphics). GMO (Graphics 
Mode), FS (Fieldsync) en DAO (Data adres 0). Ook krijgt de 
videoprocessor nog Signalen toegevoerd, vanaf de hoofdprint, welke in 
de kaart ook gebruikt worden. Dit zijn MS (Memory Select) en CLK47 


(3.58 MHz clock). 


b) A/D omzetters. 


In de schakeling worden de videosignalen naar de A/D omzetters 
gevoerd. Deze omzetters zijn gewone comperators, dus eigenlijk 1 bit 
omzetters. Het analoge Y signaal op pin 28 wordt in U1OA omgezet in 
een 1 bit digitaal Y signaal. Het beslissingsniveau wordt ingesteld 
met R19 voor monochroom. Als naar kleur wordt geschakeld vindt nog een 
correctie plaats met R21/T3. Dit is nodig omdat het DC-niveau van het 
Y signaal verandert bij omschakelen. Nu even goed opletten! Het 
referentiesignaal CHB wordt rechtstreeks aan UiZA en UIIA toegevoerd. 
Via spanningsdeler R14/RI5 wordt een ongeveer 30% lagere referentie 
aan U12B en U1IlB toegevoerd. Het R-Y (PA) signaal wordt via 
spanningsdeler R12/R13 aan UI2A en aan U12B en het B-Y (PB) signaal 
via R16/R17 aan UIlA en UIIB toegevoerd. De spanningsdelers zijn 
zodanig dat het R-Y resp. B-Y signaainiveau ongeveer qua niveau ligt 
tussen de waarde CHB op pinnen 5 en de 30% lagere waarde op pinnen 10 
van Ull en U12. Dit betekent dat R-Y waarden die boven referentie CHB 
uitkomen een waarde 1 geven op de uitgang van U12A, dit is digitaal 
signaal A, en R-Y waarden die boven de CHB-30% uitkomen, een 1 geven 
op de uitgang van U12B, dit is digitaal signaal B. Voor het B-Y 
signaal geldt een zelfde redenering zodat op de uitgangen van UIlA 
digitaal signaal C en van UIIB digitaal signaal D staan. In figuur 10 
uit het Motorola Data boek heb ik de referentieniveau's en de 


bijbehorende codering bijgetekend. 


c) RGBI codering. 


In de originele ATOM kaart werd de codering van de digitale 
signâlen ABCDY met poorttogika gedaan met de bovenvermelde bezwaren. 
Ook werden de digitale signalen niet geklokt, zodat de pixelbreedte 
niet gegarandeerd was. Een en ander heeft mij tot de volgende 
oplossing gebracht: De gedigitalizeerde signalen worden in een PROM 
type 825129 omgezet naar de RGBI signalen, de vertraging is dan voor 
alle signalen gelijk. Omdat de PROM (256*4) 8 adreslijnen en 4 outputs 
heeft, heb ik daar ook nog gebruik van kunnen maken door de colour set 
select CSS ook in de PROM te coderen. De CSS van de 6847 komt dan aan 
aarde te liggen zodat colour set 1 in de chip altijd ís ingeschakeld. 
De omschakeling naar colour set 2 gebeurt dan dus in de PROM door 
colour set 1 naar set 2 om te coderen. Dit is veel beter daar de 
analoge omschakeling in de 6847 een DC shift gaf en daardoor het 
beslissingsniveau van de comparators beinvioedde. Dan zijn er nog 2 
adreslijnen over waar de Kleurensets mee gekozen kunnen worden, Zie 
tabel 1 waar de gehele codering goed is te overzien. 
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De codetabel 1. 


Kleur Adres CSS YABCD Adres # Data # 
765 43210 T IRGB f 
1) ATOM mode. 


RED 000 11101 1D 0100 4 
GREEN 000 10000 10 9010 2 
BLUE 600 10111 17 goot 1 
YELLOW 000 10100 14 0110 6 
ORANGE 001 11101 3D 0100 4 
BUFF 001 10000 30 Oli1 7 
MAGENTA 001 10111 37 0101 5 
CYAN 001 10100 24 ooil 3 


2) CGA mode 1. 


RED 100 11101 9D 0100 4 
GREEN 100 10000 90 0010 2 
BLUE 100 10111 97 0001 1 
YELLOW 100 10100 94 1110 E 
ORANGE 101 11101 BD 0110 6 
BUFF 101 10000 BO Olil 7 
MAGENTA 101 10111 B7 0101 5 
CYAN 101 . 10100 B4 0011 3 


3) CGA mode 2. 


RED 110 11101 DD 0100 4 
GREEN 1210 10000 Do 0010 2 
BLUE : 110 10111 D7 0001 1 
YELLOW 110 10100 D4 1110 E 
ORANGE 111 11101 FD 1100 C 
BUFF 111 10000 Fo Ol1t 7 
MAGENTA 111 10111 F7 0101 5 
CYAN 111 10100 F4 0011 3 


4) ATOM mode 2. 


RED 010 11100 5C 0100 4 
GREEN 010 10101 55 0010 2 
BLUE 010 11111 SF 0001 1 
YELLOW 010 10001 51 0110 6 
ORANGE 011 11100 7C 0100 4 
BUFF 011 10101 75 Oilt 7 
MAGENTA Ol1 11121 2F 0101 5 
CYAN O11 10001 71 0011 3 


Verklaring van de modes. welke instelbaar zijn met Sl. Sl stelt 
A6 en A7 in. corresponderend met de kolommen 6 en 7 in tabel 1. 


ATOM mode 1: Deze mode geeft dezelfde codering ats de originete ATOM 
kieurenkaart. Op een CGA monitor geeft geel dan bruin. 
CGA mode 1: Geel is hier geel en oranje is hier bruin. 
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CGA mode 2: Oranje is hier licht rood, verder gelijk aan mode 1. 
ATOM mode 2: Is alleen van toepassing als pin 39 (CSS) van de 6847 1 
is. Alpha karakters zijn dan rood i.p.v. groen. 

Als een CGA kleurenmonitor gebruikt wordt is CGA mode 2 te prefereren, 
bij een SCART monitor kies dan ATOM mode 1. 


d) RGBI latch. 


Daar de data op de uitgangen van de PROM niet precies tegelijk 
aankomt en dus niet stabiel is gedurende de gehele pixeltijd. wordt de 
latch U2 gebruikt om de RGBI signalen te klokken met de 
pixelfrequentie. Daar de monochrome pixeltijd gelijk is aan de halve 
kloktijd is de pixelfrequentie dus 7.16 MHz. Daar de horizontale 
resolutie bij kleur halveert. is de frequentie dan 3.58 MHz. De 
omschakeling wordt verzorgd door USB. USC en USD. 


e) Sync scheiders. 


Met comparator U10B wordt het composiet sync signaal gescheiden 
van het op de ingang aangeboden video signaal (Y signaal). Met Rl 
wordt de drempei ingesteld. Hierna een integrerend netwerk R8/CB om de 
vertikale sync-puls er uit te halen en een differentierend netwerk 
C1/R7 om de horizontale sync-puls er uit te halen. De pulsen worden 
geinverteerd en gebufferd door U6F en U6E. Voor een CGA monitor zijn 
gescheiden sync-pulsen noodzakelijk. 


£) De pixelklok. 


Uitgaande van de klokfrequentie op pin 33 van de 6847 van 3.58 
MHz wordt door U7D, R34, C5 en U7C de frequentie verdubbeld tot 7.16 
MHz. Dit is een bekende schakeling voor dit doei, De verdubbelde 
frequentie wordt aan de omschakelaar en aan flipflop UBA toegevoerd 
Zodat ook weer de 3.58 MHz op de omschakelaar ter beschikking staat. 
UBA heeft ook nog een andere functie, zie verder hieronder bij h). 


qg) De omschakeling met poorten PCO en PC3, 


De werking van PC3 is hetzelfde gebleven als in de originele 
ATOM. PC3 zat verbonden met CSS van de 6847 en daarmee kon de 
kleurenset omgeschakeld worden. Bij monochrome monitors veranderde dan 
de helderheid. In deze schakeling wordt PC3 aangesloten op A5 van de 
PROM Ul. De RGBI codering wordt met A5 naar een andere PROM inhoud 
geschakeld. Zie tabel 1, kolom 5. Deze manier van schakelen werkt veel 
beter dan op de oude manier (?#B002=?#B002:8) . 

PCO is een van de poorten die gebruikt worden voor de cassette 
interface, maar kan vrij gebruikt worden voor andere doeleinden als 
deze interface niet gebruikt wordt (Zie ook AT&P blz. 194). 

In de nieuwe kleurenkaart wordt PCO gebruikt om te schakelen van 
ATOM mode naar 80 kotoms mode. Bij inschakelen van de computer wordt 
PCO op 1 gezet en komt deze als 0 op de D-ingang van U4A. Deze O0 wordt 
door het FS signaal naar de Q uitgang gektokt en daardoor wordt buffer 
U3 geactiveerd en staat de computer in ATOM mode. Weì moet dan de 
clearingang van U4A hoog zijn. Deze is hoog als de 6847 in tekst mode 
staat. In graphics mode is A/G hoog en dus de clearingang van U4A laag 
zodat in graphics mode (clear Ll t/m 4) niet naar 80 koiom mode 
geschakeld kan worden. De Q-not uitgang van U4A schakelt 
tegelijkertijd via connector JP1 de buffer op de 80 kolom kaart uit. 
Het zal niet moeitijk zijn om te zien dat als PCO O0 wordt 
(2#8002=?#B002:1) dat dan van ATOM mode naar 80 kolom mode geschakeld 
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wordt. Op de een van de vorige bladzijden is het al even aan de orde 
geweest: de horizontale resolutie is 256 pixels in CLEAR 4 en in ALPHA 
mode en 128 pixels in alle andere graphics modes, inclusief de colour 
modes. De latch U2 moet eenmaal per pixel geklokt worden, dit houdt in 
dat de klokfrequentie voor 25é pixels 7.16 MHz en voor 128 pixels 3 58 
MHz moet zijn. De signalen GMO en A/G zorgen samen met poort USA en 
U6D dat deze klokfrequentie alleen naar de lage frequentie geschakeld 
wordt als de 6847 in COLOUR mode en in GRAPHICS mode staat. In alle 
andere situaties is de klokfrequentie van U2 7.16 MHz. 

Het blijkt dat in CLEAR l t/m 3, met een resolutie van 128 pixels 
ìn monochroom mode. het niet nodig is dat met de lage frequentie 
geklokt wordt. In COLOUR mode is dat beslist nodig, omdat anders de 
vertikale lijnen dikker worden dan ze zijn moeten. 


h) Omschakeling 1.0 naar 1.79 MHz. 


De bekende schakeling met 2 (74LS73) flipftops om van 1.0 naar 
2.0 MHz om te schakelen werkt hier niet omdat de signalen niet aan 
elkaar gekoppeld zijn, Ze komen n.ì. van 2 geheel verschillende 
klokgeneratoren. Ik heb lang gezocht naar een oplossing en heb die 
uiteindelijk gevonden in een 74120 (Duat pulse synchronizera/drivers) 
waar J. Swinkels in A.N. 9-3 blz. 10 een uitleg van de werking heeft 
gegeven. Het zijn in feite 2 R-S flipflops Ul4A en Ul48. die na 
omschakelen het kloksignaal pas doorgeven op de eerstvolgende opgaande 
flank van het kloksignaal. Het stoppen gebeurt direct na het 
afschakelen, zodat geen te korte klokpulsen ontstaan en de 6502 
processor niet gaat hangen. 

Bestudeer de figuur “Frequentie 1.0 — 1.79 MHz” en het artikel 
van J. Swinkels om een en ander te kunnen volgen. Deze schakeling 
heeft dezelfde functie als de poorten 1, 2 en 3 in het autosync schema 


van P. Ehrlich. 
1) Autosync 1.79 MHz. 


De nu volgende beschrijving van de autosync 1.79 (1.8 voor de 
afronders) is alleen de andere uitvoering van de schakeling. De 
principiele werking heeft P. Enrtich in A.N. 5-1 biz. 20 perfect 
uitgelegd, dat ga ik dus niet nag eens doen. Het is natuurlijk erg 
handig om dit artikel erbij te nemen als men geinteresseerd ís in de 
werking. Hierboven is de wissel al besproken. Ook het omzetten van de 
klokfrequentie van 3.58 naar 7.16 MHz ìs aì vermeld. 

In het timingdiagram “Autosync 1.79 MHz" is begonnen met de 
faserelatie van PHI-IN en DAO. Vier verschillende toestanden zijn 
mogelijk, waarbij alleen toestand 4 ok is. In flipflop U4B wordt een 
sample gemaakt van DAO (DAO sample). De tijdsduur moet ongeveer 140 nS 
zijn en wordt bepaald door R4/C7. Dit sample wordt in U9A vergeleken 
met het PHI-IN signaal Dit is het kloksignaal van de 6502. 
Afhankelijk van de fase van PHI-IN ontstaat op 1U9A een van de drie 
fout signalen of het ok-signaal. Bij dit ok-signaal gebeurt er verder 
niets. maar bij sen van de fout signalen wordt aan flipflop UBA een 
resetpuls via U9B toegevoerd. Met behulp van DI/R2/C4 is de foutpuls 
op 1U9A zodanig verlengd dat altijd 1 periode van het 7.16 MHz signaal 
wordt geblokkeerd, Zie tijdstip t3. De resetpuls ia 0 tijdens de 
opgaande flank van het 7.16 MHz signaal. Dit proces herhaalt zich 
eventueel totdat de raserelatie PHI-IN en DAO ok is. In het 
timingdiagram zien we dat in dat geval er geen resetpuis ontstaat. 
Poort U9C/D2/R3/C6 blokkeert het vergelijken als de 6847 actief wordt. 
Poort U9D/D3 blokkeert het vergelijken in de 1.0 Miz stand. 

Als deze faserelatie ok is, dan 18 RUISVRIJ plotten een feit. 
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j) De signaalbuffer 


De buffer U3 buffert de videosignalen en de sync signalen om die 
over een langere afstand te kunnen transporteren. De buffer heeft een 
tri-state uitgang zodat de omschakeling van ATOM-mode naar 80 
kolam-mode gemakkelijk kan gedaan worden. De buffers in de beide 
kaarten staan om beurten aan. De uitgangen kunnen dus aan elkaar 
verbonden worden via JP1. 

De opbouw van de kaart is bij mij als volgt: ik heb de originele 
ATOM kaart doorgezaagd zodanig dat de LM319's en de 6847 er nog op 
zaten, daarna heb ik er een gaatjes print aangebouwd waar de rest van 
de spullen op staan. De totale print 1s dan weer ongeveer net zo groot 
als voorheen. JP2 en JP3 zijn connectors op de plaats van de ic-voet 
op de ATOM hoofdprint. De signalen PCO, PHI-IN,. CLKO2 en PC3 worden 
via deze connectoren geleidt. zodat de kleurenkaart meteen aangesloten 
is. Deze pennen op JP2 en JP3 moeten wel vrijgemaakt c.q. aangesloten 
worden. Alleen een bandkabel van JP1 naar de color/colour interface is 
nodig. Het PHI-IN signaat komt direct aan pin 37 van de 6502. Het 
CLKO2 (2 MHz} signaal komt van pin 11 van IC44, 

Bij eventuele belangstelling ben ik bereid een printontwerp te maken. 


Literatuur: 

A.N. 10-2 deel 1. 

A.N. 12-3 deel 2. 

AN. 9-3 ic 74120. 

A.N. 5-1 autosync 1.8. 
Motorola databoek. 

Atom colour board contents. 


Sjaak Geene, 
Zonneweide 6, 
5221 BH 's Bosch. 
Tel. 073 312080. 


FIGUNE 10 — VIDEO AND CHROMINANCE OUTPUT WAVEFORM RELATIONSHIPS 











Ee IST 
ug oose ue, wor toe 
BAAS tel IL: obd va B! 
some 









Hoezomar __ ÊrGeCS5 


8 





e 


NOTES 
1 imcon3be1st 
> a rave dBi 
2 ravB= 155-171 
4 Aele 0 Fore 7 
5 Bae 42e 


p-34 ATOMISME Th.WAATER 





Atamisme, 





In de Vaatsts Atomnieuws werd gevraagd om cops en/of 1deeen. 
Nu ligt er bij “ij at zermime tijd zen 1dee op de plank, 
waarzarn ik ru en dan stap vceor stap een stukje verder werk 
Het gaat cm het volgende: : 
an schte PC keb ik rog steeds niet = ik zie er sok 
zigentijk nog steeds riet helemaal het nut van in. PC's 
hangen ook net ze regelmaat van een klok, alleen als m'n 
atom hangt is er meestal weinig aan de hand en is bijna 
altijd het bestand te redden. Nog steeds doet m'n Atompje 
redelijk ‘rauw vat van kem vertang. M'n (simpele) 
boelkhoudinkje loopt als een trein. Je kunt er een briet of 
wat dan gok netjes op Hittikken zander dat je, zoals bijv 
bij WP S.zusenmezo, na verloop van tijd met een verwilderde 
blik in de ogen aanbett bij zen psychiatrische inrichting of 
je er alstublieft in mad. 
Al zen hele tijd vind ik m'n Atom met alì z’n uitbreidingen 
sen nogal omvangrijk zpparaat geworden. Het lijkt me een 
stuk aakkelijker als ik alleen m'n Atomkast en een 
monitortje oe m'n bureau zou hebben staan. Een soort Atom 
Notebook zogezegd. 
Zedoende ius het idee de “standaard” Atom, met al z'n 
corspr=enkelijke mogelijkheden op een dubbelformaat eurokaart 
preppen. Volgers mij zou dat moeten kunnen met de 
enwaardige ccmpenenten. De 2,D,E en F _ ZOM kunnen in 1 
Zprom bijvoorbeeld, Het Hele lage geheugen past in een IC 
Voor de schateltaart Zenk ij) sr aan het systeem dat Willem 
Kautz sen paar ;aar gelden ontwikkelde en dat uitstekend 
werkke te integreren. Cok een voeding voor het geheel zal 
dan siet al te zwaar hoeven te zijn, de tijd dat de tram 
langzamer zing “ijden als er iemand z'n Atom aanzette is 
ch zel voorbij dacht Iik zo. M'n gedachten zaan dan uit 
naar een Ateomkast met daarin: 

De nieuwe dubbel surovaartfermaat Atom 

Gesandwitched set de CP/M kaart 

Een gielje voor de 30 kolomskaart 

Een simpele lineaire voeding met zo'n pilat rond trafootje 

Zo'n klein 2.5 inch driveje 
Het ligt in de bedoeting om de printer- en de 64 pins 
uitgang aan de achterzijde op deze plaats te handhaven, 
teneinde ‘och het gebruik van uitbreidingen tot de 
gelijkheden te blijven taten behoren 
keb een hoop roten op mijn zang. Helaas heb ik de 
tar weinig tijd wegens studie deze situatie 
zich nog wel sven rtzetten, Als ik tijd van leven heb 
hoop ik dit tach wel vcor slkaar krijgen 
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1 
UU UU __NN_NNNNN Ir _ cccecee 000000 RR RRRR___NN NNNNN 
UU UU __NNN NN Ir cc C__ 00 00 __RRR RR _NNN __NN 
UU UU _NN NN II CC GO 00 RR RR NN NN 
VU _ UU _NN NN II CC 00 00 RR NN NN 
VU UU _NN NN II CC 00 00 RR NN NN 
UU UU _NN NN II cc 00 00 RR NN NN 
UU ___UU _NN NN IT cc C__ 00 00 RR NN NN 
UUUUUU NN NN II eeeeee 000000 RR NN NN 
BEBBBB BBBBBB SSssss ONLINE: 00:00-24:00 Hour/Day 
BB BB BB. BB 58 SysOp: Henri Derksen 
BB BB BB BB SS CoSysOp: Bob Brand 
BBBBBB BBBBBB SSssss AcoNetNode: 77:8500/504 
BB BE BB BB ss Telephone: +31 (0)85-425506 
BE BB BB BB ss CAT: P_O.Box 1006, 6801 BA ARNHEM 
BBBBBBB BBBBBBB SSSSSS Gelderland The Netherlands 


Wat is een BBS. 


De afkorting staat voor: Bulletin Board Systeem. Ofwel een 
soort prikboard om berichtjes in achter te laten (net zoals 
bij Albert Hein e‚d.). 

Het heeft een Computer en een modem nodig. Als er iemand belt 
zorgt de software ervoor dat het modem de telefoonlijn 
opneemt, en dat het BBS aan de gebruiker gepresenteert wordt. 
Wat krijg je zoal te zien, en wat is de logische indeling: 


CONNECT XXXXX Je hebt een digitale verbinding tot stand 
hd gebracht. 
Press ESCAPE twice to enter the BBS, of wacht 11 seconden 
Dit is nodig om te testen of er een Mailer 
belt. B.v. een collega BBS of Point. 
Dan krijg je het inlogscherm te zien, waarna om je voornaam en 
achternaam gevraagd wordt, als,ede je wachtwoord als dat al 
bekend is. Zo niet dan wordt je als een nieuwe user aangemerkt 
en moet je een paar simpele vragen beantwoorden. Een volgende 
keer ben je dan wel bekend, 


Na het inlogscherm, komt er een Bulletins menu. Hierin staan 
een aantal teksten in algemene zin. B.v. Computer Club 
Activiteiten, Antivirussen etc. 


Hieronder een voorbeeld van een inlogsessie: 


{ Af en toe is er door de redactie commentaar toegevoegd en 
wat ingekort. 1 


heekeheheheikehete de hbeehehekeh Ahh ETT 


ATZ 
OK 
ATDT 085 425506 
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CARRIER 14400 \ 

PROTOCOL: LAP-M \ Meldingen van het Modem 
COMPRESSION: V.42BIS / 

CONNECT 57600/ARQ / 

FrontDoor 2.02; Noncommercial version 

Press Escape twice for UniCorn 


U heeft nu aan de Lijn: 


Naam: UniCorn BBS (085-425506) . 
Sysop: Henri Derksen. 

Doel: Berichten en Files uitwisselen. 
Points: DownLinks zijn welcome | 

Open: 24 uur per dag, 7 dagen per week. 
Modem: Micro Technology MT3242. 


Snelheden: V21, V22, V22bis, V23, V32, V32bis 
300, 1200, 2400, 4800, 7200, 9600, 12000, 14400 
Bits Per Seconde 
Inclusief 1200/75 Bps | Full Duplex E&Nl ANSI/TTY BBS 
ErrorCorrectie: V42 LAPM en zonodig FallBack naar MNP 1-4, 
DataCompressie: V42bis en zonodig FallBack naar MNP 5. 


Node: 77:8500/504 @ AcoNet 
AKA 2:2801/208 @ FidoNet 
AKA 220:800/208 @ TotaalNet 
AKA 85:100/310 @ 085-Net 


Momentje, Even omschakelen van de FrontDoor Mailer naar 
RemoteAccess BBS, dat swappen duurt wel even, geduld A.U.B. 


[ Er volgt een welkoms-scherm met enkele mededelingen] 


You will be prompted for your name and password now, please 
use your REAL name. 


Next system event at *y (local time), in “U minutes. 
Please enter your Full Name: Henri Derksen 

Scanning user-file 

Password: tetterk 

NOTE: This system will be unavailable in 204 minutes! 
Chatten (Yellen) alleen tussen 20:00 en 23:00 Uur ! 
Security status: Sysop 


You have Sysop access to this BBS. Please enjoy your stay. 


Check for waiting mail (Y/n)? No 


UNICORN BBS H.DERKSEN 








Check for new Files (yY/N)? No 

Prkntddnteseterssten News van de Dag teeetmmenstssenenananstendeunenerener 
Hallo Allemaal, Nieuwe UníCorn BBS-gebruikers, 

Nu eindelijk de ruimte: 700 MB OnLine en OOK op Hoge snelheid 1 


Dit BBS is UNIek want het is het enige BBS dat echt Alle aCORNs ondersteunt 
Ook MS-Dos PC en andere (oude) HuisComputeraars zijn welkom ! 


UniCorn BBS brengt u het nieuws op de juiste SNELheid ! kijk maar: 
Nu al op 300/300, 1200/75, 1200/1200 en 2400/2400 Bits Per Seconde. 
Sinds 1 Maart 1932 ook nog op V32 9600 BPS en V32bis 14.400 BPS ? 
Leuk voor points en andere pollers ! 


Lees ook even de BULLETINs 


UniCorn BBS Daar kun je niet omheen als ACORNist ! 


{ ) te) C.A.T. 1992 








\/ FA N n 
| bod da ih TE TE Ho il Te TTE [ Pulling ec's 
T unicorn BBS T is lu (jn (in (le iT (rt {iN tis | All Hobby Computers 
EA AEH 
' DN NN 
< > > 











0 = SysteemInfo 3 = Info Acorn Big Ben Club 

1 = UniCorn BBS 4 = Info Acorn Atom Club 

2 = New User Info 5 = Info AcoNet 

6 = Net Mail berichten versturen 10 = Acorn Big Ben Club Regio Oost 
7  DataCommunicatieProtocollen {Agenda 1994) 

8 = Organisatie Software 11 = Acorn Atom Club Regio Arnhem 
9 = Antidussen ! {agenda 1994} 

13 = Veel gestelde Acorn vragen FAQs 12 = Info Auditief Gehandicapten 


File to view (Enter=quit): 


[ U kunt door een van bovenstaande items te kiezen informatie 
lezen over het betreffende onderwerp |J 


Unicorn BBS 
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Statistics 
User list/search 
Kours of usage 


File section Goodbye (logoff) 
Change Setup 


Todays callers 


Message section 
Bulletin info Yell the Sysop 
Extra info Version 
Outside *ysop 
Select: M 





T\ The MessageBase /| 
T_\ From Unicorn BBS / 
TN 

ï \/ 

Î Read it 

Î 
Ï 





There are 74 messages in this area. 


System contains 4746 messages, rangìng 1228 to 27529. 
Msg.area #& 3 SysOp’s u 

Area change Read (read msg) Enter message List (brief) 
Check mail-box Verbose msq list sWich Combined Area's On/Off 


MAIN MENU 
Goodbye (logoff} 


Do Read Combined Statistics Net Adressen Lijst 


Browse nodelist 


Select: A 
Algemeen binnen Unicorn u Handel (FreeLink & AcoNet) 
SysOp's U Klets/Onzin (AcoNet) 
DataCommunicatie EN Acorn Big Ben Club 
A 
N 





. Auditief Gehandicapten 


AcoNet Algemeen 
Net-Mail (van BBS naar BBS) 
27 MHz Bakkies 

Acorn Atom 

Sysop Support 

Argus & Stentor Modem 
Test Aconet 
DataCommunicatie TotaalNet 
Programming AcoNet 
Hardware TotaalNet 
International Archimedes 


operating Systemen (TN) 
Handel TotaalNet 

EcoNet Local Area Netwerke! 
BBsinfo (Reclame Sysûp's) 
Remote Access Support (TN) 
Sex Algemeen 

MultiTasking TotaalNet 
Chat 085-Net 
International Acorn SysOp’'s 
Handel 085-Net 

Virus Forum TotaalNet 
FileZoekers FreeLink 
VraagBaak TotaalNet 
Modems (FreeLink) 
TotaalNet Hub 20 
Archimedes BinkleyTerm 
Archimedes Programming 
Moppen 085-Net 

2801 

Disable.512 

COMP. SYS. ACORN. ANNOUNCE 
COMP. SYS. ACORN, TECH 
Gehandicapten 028 

Puzzel (AcoNet) 

Bestuur Big Ben Regio Oost 


Baaauararanan 


Crap PAENKAARP 


Auto’s 











AcoSysop's 
AcoNet Bestuur 


Atari Computer{(s) TotaalNet 
Hackers Info TotaalNet 
Boeken _ (AcoNet) 
BBS&Mailer Support (AcoNet) 
VraagBaak Acorn's 
Hardware Acorn's 
International BBC 
International Acorn Mailers 
Knooppunt Arnhem/Nijmegen 
SysOp's 085-Net 

Muziek (AcoNet) 
RadioZendAmateurs Totaalnet 
TotaalNet SysOp's 
TotaalNet BabbelBox 
MutiMedia TotaalNet 
NetZaken Totaalnet 
Algemeen TotaalNet 
Programmeertalen (TN) 
Lokaal _Nieuws-085-Net 
UniCorn DownLinks (Pollers) 
Virus Informatie TotaalNet 
Mailers algemeen (FreeLink) 
BBSsen algemeen (FreeLink) 
FreeLink Chat/Klets 
Achimedes Communications 
UseNet 

Mededelingen & vragen AcoNetA 
AcoNet SoÉtWare OntwikkelingA 
Geanealogie 

COMP . SYS . ACORN 

COMP, SYS. ACORN. ADVOCACY 
EcoNet (International) 
Big Ben Club Regio Oost 
Comp.Sys.Acorn. Games 


vaPsAACEAAAdAAAPZSnAPrPPaAAPd 


Pans 
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83 …. AcoNet Hub 5 DownLinks A 84 .…. Comp.Binariea.Acorn A 
85 ……. Comp, Sources, Acorn A 86 ... ACO.INT.BBS&Mailer A 
87 .. ACO. INT.DataComm A 88 ... ACO. INT. General A 
89 .. ACO. INT. Hardware A 90 .., ACO. INT. Questions A 
198 Bad Messages 199 .…. Dupe Messages 


Select area: 13 


[ Door hier nu een gebied te kiezen kunt u berichten lezen en verzenden in dit 
berichten gebied. Het is de bedoeling dat u zich houdt aan het onderwerp, dus 
geen Moppen in de Handel area. | 


There are 1 messages in this area. 
System contains 4746 messages, ranging 1228 to 27529. 


Msg.area # 13 .…. Acorn Atom u 

Area change Read (read msg} Enter message List (brief) 

Check mail-box Verbose msg list sWich Combined Area's On/Of£ 

Do Read Combined Statistics MAIN MENU Net Adressen Lijst 
Browse nodelist Goodbye (logoff) 

Select: R 

{Florward, (Reverse, (I)ndividual, (Help, 

(Marked, (Niew msgs, (S)elected, (Q}uit. 

Select: Reverse 

Message area "Acorn Atom U" contains 1 messages. 


System contains messages ranging 1228-275293, 
Enter message number to start at (Enter=First/Last): 
Pause after each message (Y/n})? Yes 


Message #9490 - Acorn Atom u 
Date: 14-09-94 16:07 
From: Henri Derksen 
To: All 
Subject: DownLoad gevuld 


Hallo Atom liefhebbers, 

Door de prettige medewerking van Roland Leurs heb ik de DownLoad voor onze 
Atom kunnen vullen met de meest recente ATOM in PC software. 

En uiteraard nog wat ander leuk spul. 

Doe er je voordeel mee 

e 

# Origin: Connectivity is the Future; Unicorn BBS 21 85 425506 (77:8500/504) 
tA)gain, (Next, (Last, (Reply, (E)nter, (Djelete, (!*X/=), (S)top: Next 


End of messages 
Press (Enter) to continue: 


( Van hieruit maken we een sprong naar het hoofdmenu. } 
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Unicorn BBS 





/ Main 


menu / 


/ 





File section 
Yell the Sysop 


Message section 
Bulletin info 


Extra info Version 
Outside *ysOp 
Select: F 


UniCorn BBS 
File-Section and Transfer: 


From B8Ssytem via Wire 2 Your Rotating Memory 
The SoftLoverToys: 


Goodbye 
Change Setup 
Todays callers 


Statistics 
User list/search 
Hours of usage 


(logoff) 


te) C.A.T, 1991 








"Compact Cassette. 





| Dl 
| Di 








Slow Love Fast Love 


Ga met AreaChange naar de Juist FileArea om te Downloaden 


Metal Love 


Instant Love, 


: 


UpLoads komen altijd in FileArea 17, wel zichtbaar, niet te DownLoaden. 


File Area # 21 Archivers 

Area change Locate Files list Goodbye 
Upload (send) Download (receive) Statistics MAIN MENU 
Wild-card search Raw dir Copy File > andere Area 


DowNload for SysOps Outside 
Select: A 


File Areas: -------eer 
Algemeen binnen Unicorn BBS 
DataCommunicatie 
Acorn BBC/Master/Electron 
MS-Dos (Andersdenkenden) 
Utils Heel Handig 
Cambridge 288 
BBS Support 
CP/M 
UpLoads 
TeleText 
Archivers 
ProgrameerTaal Pascal 
Fsc Fido Standard DoCuments 

Demo's 

ACO-File 

Big Ben Club 

ACO- INFO 

ACO-WimpLink 

virusInfo T 
Handicap 


kak 








Sysop's 
Acorn Archimedes 
Acorn Atom 


VierRussen 


Argus & Stentor Modem 
Mailer Support 

Unix 

32016 

BasiCode 

Electronische Tijdschriften 
ProgrameerTaaì C 

Auditief Gehandicapten 

FTS Fido Technical Standard 
ACO-FAQS 

ACO-BBCSCAN 

Aco-FrontDoor 

Aco-SoftWare 

Packet Radio 

Imail (MaílTosser/scanner) 
TotaalNet NodeLijsten 
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41. FreeLink NodeLijsten A 42 .. FreeLink Node Diffs 
Select area: 6 


File Area # 6 Acorn Atom 





Area change Locate Files list Goodbye 
Upload (send) Download (receive) Statistics MAIN MENU 
Wild-card search Raw dir Copy File > andere Area 
DowNload for SysOps Outside 

Select: F 


Press P to Pause, S to Stop 


Unicorn BBS FileArea: 6 Acorn Atom 


Files voor de Acorn Atom 


AN-TRACE.ZIP 22263 16-08-94 Acorn Atom Nieuws Item tracer, bijgewerkt t/m 
jaargang 12 (1993). 

ATOM_220.ZIP 202740 05-06-94 Atom operating soft, incl terminalprogramma 
v2,20 voor Acorn Atom in PC kaart. 


ATOMLIST. ZIP 8666 16-08-94 Laat de inhoud van een Atom Basic file zien 
vanuit DOS 

ATOMERR. INC 6469 03-12-94 *Include file for ASM atomPC terminal 2.2 

DARNIT. RUN 5881 20-11-93 Darnit, spel voor Atom-in-pc, ready-to-run 

FORTUIN. ZIP 15884 16-08-94 Rad van fortuin, spel voor Atom-in-pc 

FRONT. ARC 201021 20-09-91 Acorn Atom plaatjes van de Atom Nieuws Cover, 


geARCed met Tekening.EXE voor de PC 
PIC-WEG. ARC 184051 01-01-90 Acorn Atom Plaatjes gecomprimeerd. 


PLAAT2 ARC 119832 29-12-92 Vervolg Atom Plaatjes, zie Atom Nieuws 1993 
No.1 Pagina 4. 

REVERSI. RUN 2566 08-11-93 Spel voor Atom-in-pc, ready-to-run 

ROTFAN . RUN 1291 16-08-94 Grafische demo voor Atom-in-pc, ready-to-run 

SNAPPER. RUN 5371 12-10-93 Spel voor Atom-in-pe, ready-to-run 

TEKENING.EXE 41957 29-12-92 PC-Programma om *.AGS Acorn Atom plaatjes te 
tonen. 


Unicorn BBS FileArea: 6 Acorn Atom 
+ 











Press (Enter) to continue: 


File Area # 6 .…. Acorn Atom 
Area change Locate Files list Goodbye 
Upload (send) Download (receive) Statistics MAIN MENU 
Wild-card search Raw dir Copy File > andere Area 
DowNload Eor SysOps Outside 

Select: G 


Are you sure you want to log-off [y/n] : Y 
Leave a note to the Sysop (y/nl ? N 


[ Er verschijnt tenslotte nog een lijst met andere Acorn- 
BBSsen. 1 


kkk kkkkkkkkkkkkkkkkkkkkekkkkkkerkkkkkkkkkkkekkekkekkkkkikk 
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Einde Inlogsessie op UníCorn BBS. 
Het is de bedoeling dat er op uniCorn BBS de volgende 
uitbreidingen gaan plaatsvinden. 


* Big Ben Club SoftWare voor de Archimedes (Nu al 
gedeeltelijk) 

* Big Ben Club SoftWare voor de BBC (geplanned) 

* Acorn BBC SoftWare Big Ben Club Regio Gooi & Eeemland 
Geplanned) . 

* Acorn Atom Club SoftWare (geplanned). 

* Atom in PC SoftWare (UpDates) (Nu al aanwezig.) 


Uiteraard kunt je ook meedoen aan het EchoMail en NetMail 
gebeuren. Daarvoor kun je gebruik maken van AcoNet 77:8500/%,+ 
en FidoNet 2:2801/*.* Nog mooier is het als u Point wordt van 
UniCorn BBS. 

Je kan dan bijna alle Nederlandse en ook Engelstalige Acorn 
message Area's lezen en beschrijven. 

Voor meer informatie: schrijf een priveberichtje aan de SysOp. 


Ik hoop dat UniCorn BBS ook de 8-bits computerliefhebbers het 
naar de zin kan maken. Inloggen, of zelfs Point worden is bij 
UniCorn, op de telefoonkosten na, GRATIS, Voor de Acorn 
Archimedes is er ook een Pointprogramma WimpLink 1.01 als 
ShareEare beschikbaar. 


Veel succes en welkom in DataLand. 


MvGr. |_l 
Vifenri. 


ROTATIE ; INTIKKEN EN RUNNEN 


10 

20 

30 

40 

50 

60 

70 

80 

90 

100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
445 
446 
450 
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REM ROTATE 


REM SCHUIF ALLES VAN RECHTS NAAR LINKS 
REM BIJDRAGE VOOR INTIKKEN EN RUNNEN MAAR 


REM LEENDERT 31/10/1994 
DIM LL20 


FOR N=l TO 20; LLN=-1; NEXT 


FOR N=0 TO 2 STEP 2 
P=#7000; [ 
:LLO LDA @#80 
STA #71 

LDA @#00 

STA #70 

LDX @24 

:LL3 LDY @#1F 
ELC 

:LL4 LDA (#70),Y 
ROL A 

PHA 

DEY 

BPL LL4 

LDA @#00 

STA #72 

LDY @#00 
:LL5 PLA 
STA (#70) ,Y 
ÍNY 

CPY @#1F 

BNE LLS 

PLA 

CLC 

STA (#70),Y 
LDA #70 

CLC 

ADC @#20 

STA #70 

BCC LL3 

INC #71 

DEX 

BNE LL3 
RTS;] 

NEXT 

CLEAR 4 

MOVE 10,10;DRAW 256, 192 
DO 

LINK LLO 

UNTIL 0 

END 
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Even een lijntje rechttrekken 
door roland leurs 

In het vorige nummer van Atom Nieuws schreef Leendert het 
fantastische verhaal over de theorie die schuil gaat achter 
het tekenen van een lijn. Dat was HET artikel waar ik al ruim 
een jaar op zat te wachten. Deze interesse wordt opgewekt door 
de Atom-in-PC (had u anders verwacht?). In versie 3.xx van het 
terminal programma worden immers de grafische mogelijkheden 


meer uitgebreid en één van die uitbreidingen is het trekken 
van een lijn. 





Ofschoon we dat al lang kunnen doen met MOVE en DRAW zit aan 
die werkwijze een enorm groot nadeel. Stel we tekenen de 
volgende lijn: 


MOVE 0,0;DRAW 1000,0 


wat gebeurt er dan? De Atom berekent met zijn eigen ROM- 
routines welk pixel geplot moet worden en springt dan naar de 
plotvector om het pixel daadwerkelijk op het scherm te zetten, 
In een extended video mode wordt dan een commando gegegeven om 
een pixel op het scherm te zetten, gevolgd door de x en y 
coördinaten en de plotmode. Even rekenen: 


commando : 2 bytes 
x-coördinaat: 2 bytes 
y-coördinaat: 2 bytes 
plotmode: 1 byte 
Totaal: 7 bytes om één pixel te plotten |! 





Dat zijn voor bovengenoemde lijn dus 7000 bytes die 
overgezonden moeten worden om een lijn te tekenen. Dat is nog 
meer dan het hele SNAPPER programma. En omdat alles lekker via 
de trage I/O bus van de PC gaat duurt dat lang. Zeker als je 
256 van die lijnen wil tekenen. 


Daarom heb ik het terminal programma uitgebreid met een 
commando om een lijn te tekenen. In totaal worden er dan per 
lijn 10 bytes overgezonden. Op een 486DX 33 MHz is kost het 
tekenen van een lijn dan nog maar ongeveer 1/3 van de tijd 
vergeleken met de ouderwetse manier. 


Maar goed, de titel van het verhaal geeft aan dat ik een 
lijntje recht wil zetten en dat is wel nodig. Want mijn 
routine heb ik afgeleid van de listing van Leendert. Maar 
helaas maken grote geniën ook fouten. 


De tekst over het Bresenham algoritme lijkt mij geheel 
duidelijk, zeker met de getekende voorbeelden. Maar in het 
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stroomdiagram op bladzijde 54 zitten twee enge bugs. De eerste 
staat in het vijfde blokje (van bovenaf geteld]. Daar staat in 


dat moet zijn: 





In de volgende stap wordt ErrorTerm dan vergeleken met halfX; 
daar is niets mis mee maar als ErrorTerm > halfX is moet Y 
aangepast worden. Het stroomdiagram laat in dat geval de 
sprong uitvoeren om te testen op het laatste pixel. 


Verander in die vergelijking dus > in « of wijzig de Y{(es) 
naast de vergelijking in een N(o). Daarmee komen de tekst en 
het stroomdiagram weer met elkaar overeen waardoor het verhaal 
makkelijker te begrijpen is. 


Dan staan er nog twee bugs in de listing. In regel 570 wordt 
naar het verkeerde label gesprongen. Er moet daar gesprongen 
worden naar LL10 om het volgende pixel te plotten. (Leendert 
laat de routine naar LL11 springen waardoor steeds ErrorTerm 
op de beginwaarde gezet wordt. Uit ervaring weet ik dat 
sommige lijnen wat veel correcties krijgen en dan heel ergens 
anders eindigen dan gepland.) 

De tweede fout is wat duidelijker te zien en staat in regel 
700. Daar staat de sprong naar het einde van de routine; 
helaas springt-ie één byte te kort en gaat dan nog wat 
tekenen. 


Wijzig dus in de listing de volgende twee regels in: 


570 JMP LL10 \ plot de coördinaten 
700 BEQ LL9 \ indien gelijk dan einde routine 


Dan zit er nog een doordenkertje in de listing, zeker als je 
hem vergelijkt met het stroomdiagram. In het diagram wordt 
ErrorTerm vergeleken met halfX; in de listing (zie regels 720 
en 730) wordt getest of ErrorTerm positief of negatief is. Dit 
lijkt heel verschillend maar in het programma wordt ErrorTerm 
in het begin van de routine (regels 590 t/m 635) niet gelijk 
gemaakt aan 0 (zoals in het stroomdiagram staat) maar aan 
halfX., Daardoor kan de vergelijking later met O0 gemaakt 
worden, Vandaar de test op een positieve of negatieve 
ErrorTerm. 


Hopelijk is het een en ander nu wat duidelijker, 
Leendert nogmaals bedankt voor de uitleg. 


Met vriendelijke groeten, 
Roland Leurs 
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Een gestructureerde manier van ontwerpen 


Inleiding 


Het schrijven van een programma is een ware kunst. Toch is 
zoiets niet alleen een kwestie van Jobs geduld en Salomo's 
wijsheid. Er zijn diverse methoden om het schrijven van een 
programma in goede banen te leiden. 

In dit stuk wordt een methode beschreven voor het opzetten van 
de structuur voor een programma. 

Zoals voor alle dingen in het leven: deze methode leer je door 
het te doen en te gebruiken. Natuurlijk zal het zo zijn dat 
het lastig lijkt op het eerste moment, natuurlijk zal het zo 
zijn dat het allemaal hee} anders kan. Maar het is een methode 
en pak er uit op wat je kunt gebruiken. 


De methode 


Iedereen werkt volgens een bepaalde methode bij het schrijven 
van een programma. De meest populaire noem ik u: JBF, de Jan 
Boeren Fluitjes methode. Niets plannen. Nee, gewoon een avond- 
je gaan zitten en kloppen maar. 

Een andere iets minder bekende maar zeker net zo vaak toege- 
past is methode Heijermans. De naam van deze methode is afge- 
leid van een titel van een van de boeken van H. Heijermans: op 
hoop van zegen. Ook niet echt iets waar de sfeer van professi- 
onaliteit van afdruipt dus. 

Verder nog wat professionele methoden Yourdon, als variant op 
de beroemde tandeborstel. De analogie gaat verder: net als die 
tandeborstel moet je ook de methode om de drie maanden vervan- 
gen. 

Nasi Scheiderman, als variant op de Indische keuken. Erg 
handig, maar vaak wat chaotisch als het op de details aankomt. 

De methode die ik hier wil gaan behandelen is de JSP, de 
Jackson Structured Programming methode. Door boze tongen ook 
wel vertaald met Jackson Slow Programming. Maar oordeelt u 
zelf. 


JSP 


De genoemde methode is bedacht door een Amerikaanse wiskundige 
genaam Michael Jackson, niet te verwarren met onze zingende 
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kindervriend. Deze methode is erop gebasseerd dat alle zaken 
een begin conditie hebben, een iteratie (een do-until) en een 
eind conditie. Klinkt allemaal wat verheven maar werkt erg 
logisch. Kijkt u maar even mee in het volgende voorbeeld: 


1 Open bestand 
Lees le record 
2 while not (EOF) 


verwerk record 
lees record 
end while 
3 sluit bestand 


Het aardige van de methode is, dat je hem volledig uit kan 


tekenen. Iedere situatie beschijft de functionaliteit in ene 
blokje. Zo valt bovenstaand voorbeeld in onderstaand plaatje 


te vatten 
Voorbeeld 


Verwerk 









Sluit 
bestand 


Open bestand 


Lees le record 









lees next 
record 


Tel op 








In de methode zijn wat afspraken gemaakt over notaties. Ieder 
blokje beschijft een functie, zo u wil subroutine. Het sterre- 
tje in verwerk duidt een iteratie aan. Meestal wordt de conti- 
tie erbij geschreven. In dit geval zou dus bij verwerk de 
conditie ‘until EOF’ worden geschreven. 

Staat op de plaats van het sterretje een rondje, dan wordt een 
IF conditie aangegeven. Ook hier geldt, dat de conditie wordt 
opgeschreven. 

Doordat in de blokken de naam van de subroutine wordt aangege- 
ven, automatisch een onderscheid gemaakt tussen statements en 
het aanroepen van subroutines. Goto's komen in dit plaatje 
helemaal niet voor. Hiermee wordt weer eens aangetoond dat 
’goto' less programmeren geen doel op zich is, maar dat de 
gekozen methode het gebruik van goto'’s helemaal overbodig 
maakt. 
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Bovenstaand JSP diagram, want zo heet zo'n ding officieel, kan 
worden vertaal in onderstaand programma: 


10 PROGRAM voorbeeld 
20 REM JSP demo 
30 PROC Init 


40 WHILE NOT F_EOF 

50 PROC Verwerk 

60 WEND 

70 PROC Close 

80 END 

90 REM 
100 DefProc Init 
105 F_EOF=FALSE;Totaal=0 
110 at=openin"bestand" 
120 e$=fgets (Has) 
130 if EOF(#a%) then F_EOF=TRUE 
135 ENDPROC 
137 REM 
140 DefProc Verwerk 
150 Totaal=Totaal+ (gegevens uit record) 
160 e$=fgets (#a%) 
170 if EOF(#a%) then F EOF=TRUE 
180 ENDPROC 
190 rem 
200 DefProc Close 
210 fclose(#a%) 
220 ENDPROC 


Het aardige is dat er een duidelijke relatie ligt tussen het 
plaatje en het programma. Sterker nog: Als een van beide 
ontbreekt, is het toch mogelijk het andere te reproduceren. In 
de praktijk is het zo dat programmeurs die vanuit het zelfde 
JSP diagram werken, tot de zelfde oplossing komen. 


En nou verder 


Leuk, aardig en lastig. Dat is wellicht het gevoel wat u nu 
heeft. Maar aan de hand van een aantal voorbeelden wil ik u 
meevoeren naar de mogelijkheden van deze methode. Hebt u de 
methode eenmaal onder de knie, dan zijn er geen programma's 
meer die te groot of te complex zijn. Immers alle stukken 
vallen op te delen in eenvoudige brokken. 
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Een voorbeeld 


Tegenwoordig heet alles een Case. Dus waarom ook wij niet onze 
eigen case. 

We maken een lijst van rekeningnummers. Ieder rekeningnummer 
komt op een apart blad. Ieder rekeningnummer heeft echter 
verschillende componenten, te weten aandelen, obligaties, 
futures, opties en warrants. Achter ieder component kunnen 0 
of meer mutaties zitten. U koopt aandelen, dat resulteert dan 
in een toename van het aantal aandelen. Verkoopt u ze, dan, 
jawel, neemt het aantal aandelen af. Zo ook voor de overige 
componenten. Het totaal van de aan en verkopen wordt op het 
lijstje vermeld, zodat onderstaand lijstje verschijnt: 


Rekeningnummer: XX.XX. XXX. XXX 


aankoop verkoop 
Aandelen: XK. KKK, KK 
Obligaties: 
Futures: 
Opties: 
Warrants: 


Na dit inleidend verhaal is het al mogelijk een JSP diagram te 
maken van bovengenoemde analyse. Daar gaan we: 
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LIJST 
EOF 
Lees eerste verwerk * Sluit af 
rekeningnummer reknr 
_ 
EOF 
| 
Lees eerste verwerk * Lees volgende 
produkt produkt rekeningnummer 
EOF 
Lees eerste verwerk m Lees volgende 
mutatie mutatie produkt 
Saldo >0 ELSE 
TT 
Tel saldo op Of{Tel saldo op O Lees volgende 
bij aankoop bij verkoop mutatie 














Uitgewerkt in coding levert dat qua principe het volgende 
programma op. Gemakshalve gebruikt ik wat leesbare statements 
die om wille van de duidelijkheid niet geheel Basic zijn. 


10 PROGRAM LIJST 

20 PROC _INIT REKENINGNUMMER 

30 DO 

40 PROC VERWERK REKENINGNUMMER 
50 UNTIL REK EOF 

60 PROC ENDING 

70 END 


100 DEF PROC _INIT REKENINGNUMMER 

110 OPEN "REKENINGNUMMER" FOR INPUT AS #1 

120 REK EOF = READREC REKENINGNUMMER, INVOERRECORD 
199 ENDPROC 


200 DEF PROC VERWERK _REKENINGNUMMER 
210 PROC INIT PRODUKT 
220 DO 
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230 
240 
250 
299 


300 
310 
320 
399 


400 
410 
420 
430 
440 
450 
460 
470 
480 
499 


500 
510 
520 
599 


600 
610 
699 


700 
710 
799 


800 
810 
899 


900 
210 
999 


PROC VERWERK PRODUKT 
UNTIL PRODUKT EOF 
PROC END PRODUKT 
ENDPROC 


DEF PROC INIT PRODUKT 

OPEN "PRODUKT" FOR INPUT AS #2 

PRODUKT EOF = READREC PRODUKT, INVOERPRODUKT 
ENDPROC 


DEF PROC VERWERK_PRODUKT 
PROC INIT MUTATIES 
Do 
IF MUTATIESALDO > 0 
PROC_TEL_MUTATIE_OP 
ELSE 
PROC_TEL_MUTATIE_AF 
UNTIL MUTATIE _EOF 
PROC_READ NEXT MUTATIE 
END 


DEF PROC INIT MUTATIES 

OPEN "MUTATIES" FOR INPUT AS #3 

MUTATIES EOF = READREC MUTATIES, INVOERMUTATIE 
ENDPROC 


DEF PROC TEL MUTATIE OP 
LIJSTJE [PRODUKT, 1] +SALDO 
ENDPROC 


DEF PROC_TEL MUTATIE AF 
LIJSTJE [PRODUKT, 21 -SALDO 
ENDPROC 


DEF PROC_READ_ NEXT. MUTIE 
MUTATIE EOF = READREC MUTATIE, INVOERMUTATIE 
ENDPROC 


DEF PROC READ NEXT PRODUKT 
PRODUKT. EOF = READREC PRODUKT, INVOERPRODUKT 
ENDPROC 


1100 DEF PROC END _ PRODUKT 
1110 CLOSE MUTATIES 
11989 ENDPROC 
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1200 DEF PROC READ NEXT REKENINGNR 

1210 CLOSE PRODUKT 

1220 PRINT GENOEMD LIJSTJE 

1230 REKNR EOF = READREC REKENINGNR, INVOERREKENING 
1299 ENDPROC 


1300 DEF PROC _ENDING 
1310 CLOSE REKENINGNR 
1399 ENDPROC 


Al met al best omvangrijk qua omvang, maar qua toegankelijk- 
heid moet het toch ook wel iets zijn. Zoals gezegd: tik het 
programma niet over wat het zit vol met niet-basic opdrachten. 
Ik verdenk u ervan dat u de vertaalslag naar de juiste syntax 
zelf kunt maken. 


Probeert u zelf eens een klok te maken op basis van een JSP 
methode. Denk daarbij aan het feit dat er 60 seconde in 1 
minuut gaan; 60 minuten in 1 uur en 24 uren in 1 dag. Gebruik 
de variabelen S, M en U. Doe de iteratie met de genoemde 
getallen met een DO-UNTIL of iets dergelijks. Maak eerst een 
JSP diagram en schrijf daarna de code. Stuur het resultaat 
eens op aan de redactie en ik meld u een van de volgende keren 
of er überhaupt reactie is gekomen, want de Atomisten zijn 
blijkbaar meer een lezend dan een reagerend volkje geworden, 
en wat er eventueel valt te verfijnen aan de methode of de 
uitleg ervan. 


Conclusie 


De JSP methode kan vele voordelen bieden. Het belangrijkste 
voordeel is dat het een methode is die taal onafhankelijk is 
en bovendien in een afbeelding kan worden gegoten. Door de 
opzet van de methode wordt ook slechts op een plaats in de 
code een bepaalde functie gedaan. Gaat in het genoemde voor- 
beeld het lezen van een mutatie niet goed, dan heeft het geen 
zin om in de procedure die het rekeningnummer leest te kijken, 
nee, de procedure waar de mutaties worden gelezen behoeft dan 
nader onderzoek. Zeker in grote programma's is dat toch wel 
ideaal. 


ATOM in-PC 
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Atom-in-PC: Meest gestelde vragen, 








door roland leurs 


Regelmatig krijg ik telefoontjes van mensen die enkele vragen 


hebben met 


betrekking tot de inmiddels zeer veel gekochte 


Atom-in-PC kaart. In dit artikel zal ik deze vragen nogmaals 
beantwoorden. Niet omdat ík geen telefoon wil, integendeel 
zelfs, maar zodat u sneller uw vragen beantwoord krijgt. 


Vraag: 
Antwoord: 


Vraag: 


Antwoord: 


Vraag: 


Antwoord: 


Vraag: 
Antwoord: 


Moet er per se een R65C02 processor gebruikt worden? 
Nee, u kunt gerust een 6502 processor gebruiken, op 
1 of 2 MHz. De snelheid kan ingesteld worden met de 
jumper bij het klokcircuit. Zelfs de 65802 kan 
gebruikt worden. 


Na het opstarten van het terminal programma blijft 
het scherm zwart of er verschijnen doorlopend 
karakters op het scherm. Waar ligt dat aan? 
In de meeste gevallen vindt de PC in het adres- 
gebied de kaart niet. Omdat de controle nogal erg 
eenvoudig is kan het voorkomen dat de PC "iets" ziet 
op de controle-adressen en het domme ding "denkt" 
dan dat de kaart aanwezig is op dat adres. De 
oplossing is dan het meegeven van de /A=aaa optie. 
Als bijvoorbeeld de kaart geadresseerd is op I/O 
adres 310h geef dan de volgende optie mee: 

ATOM /A=310 


Waarom laten enkele *-commando’s laten het hele 
systeem vastlopen? 

Door een foutje in de versies t/m 2.15 van het 
terminalprogramma vindt de software de naam van de 
DOS commando interpreter niet als deze niet als 
eerste in de DOS environment staat, Vanaf versie 
2.20 is deze fout verholpen. 


Waar kan ik de meest recente software krijgen? 
Op het Unicorn BBS van Henri Derksen; telefoonnr 
085-4255006. 


Deze lijst zal regelmatig aangevuld worden. U kunt deze dan 
downloaden van bovenstaand BBS. Mocht u nog vragen hebben, bel 
of schrijf gerust. Sinds kort kan het zelfs per E-Mail: 


Roland Leurs telefoon: 046-370650 
Prins Mauritslaan 43 fidonet: 2:285/226.9 
6191 EC Beek 





_p-26 REGIOADRESSEN 


REGIO-ADRESSEN. 


Wilt U lid worden van de ATOM COMPUTER CLUB ?. 

Neem dan contact op met de penningmeester van de regio waar U bij 
ingedeeld wenst te worden. Deze kan U inlichten omtrent het 
lidmaatschap. 


Regio NOORD-HOLLAND : 
P.v.Kuik, Zuideinde 54-a, 1843 JP Groot Schermer. 
tel. 02997- 1902. 


Regio DEN HAAG +ARNHEM 
Th.waayer, H.v.Boeijenlaan 66, 2273 DC Voorburg. 
tel. 070-3862504. 


Regia BRABANT-OOST + ZEELAND 
J.Teutings, K.Doormansstraat 54, 5224 GL Den Bosch. 
tel. 0073-212888. 


Regio LIMBURG + BELGIE EN OOST/NOORD NEDERLAND 
C.Rutkowski, Mgr.Buckstr.8 6121 KV Urmond 
tel. 04498- 60136 


Leden die behoren tot opgeheven regio's, danwel regio's die conform 
de statuten geen lid meer zijn van de federatie, worden in verband 
met de financ. administratie en de verzending van ATOM-NIEUWS,door 
de federatie toegewezen aan de nabije regio's. 

Zo men tegen deze indeling bezwaar heeft, om welke reden dan ook, 
kan men de regio van eigen keuze opgeven aan de penningmeester van 
de federatie: T.Rutten , zie de pagina van de federatie in dit 
blad. 


Bij het aangaan van het lidmaatschap kunt U de contributie over- 
maken op de rekening van de federatie. Vermeld hierbij uw volledige 
naam, en adres , alsmede evt. de regio waarbij U wenst te worden 
ingedeeld. 


